(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    742877,      16976]
NotebookOptionsPosition[    736099,      16773]
NotebookOutlinePosition[    736444,      16788]
CellTagsIndexPosition[    736401,      16785]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "SetDirectory", "[", 
    "\"\<E:\\\\work\\\\thesis\\\\\:8bba\:6587\\\\nb\\\\\>\"", "]"}], ";"}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.503634554515625*^9, 3.5036345546875*^9}, 
   3.510911323125*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Clear", "[", "\"\<@\>\"", "]"}], ";"}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Clear", "::", "\<\"wrsym\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Symbol \\\\\\\"\\\", \\\"MT\\\"]\\)\
\[NoBreak]\\!\\(\\*StyleBox[\\!\\(\[FormalA]\\), \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" is \
Protected.\\\\\\\"\\\", \\\"MT\\\"]\\) \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/wrsym\\\", \
ButtonNote -> \\\"Clear::wrsym\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.503634425*^9, 3.5036345588125*^9, 3.503651243609375*^9, 
  3.503701755484375*^9, 3.503741728*^9, 3.503787563640625*^9, 
  3.503806050890625*^9, 3.504220265546875*^9, 3.504253634328125*^9, 
  3.5044128974375*^9, 3.504478584125*^9, 3.504512987140625*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Clear", "::", "\<\"wrsym\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Symbol \\\\\\\"\\\", \\\"MT\\\"]\\)\
\[NoBreak]\\!\\(\\*StyleBox[\\!\\(\[FormalB]\\), \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" is \
Protected.\\\\\\\"\\\", \\\"MT\\\"]\\) \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/wrsym\\\", \
ButtonNote -> \\\"Clear::wrsym\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.503634425*^9, 3.5036345588125*^9, 3.503651243609375*^9, 
  3.503701755484375*^9, 3.503741728*^9, 3.503787563640625*^9, 
  3.503806050890625*^9, 3.504220265546875*^9, 3.504253634328125*^9, 
  3.5044128974375*^9, 3.504478584125*^9, 3.50451298715625*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Clear", "::", "\<\"wrsym\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Symbol \\\\\\\"\\\", \\\"MT\\\"]\\)\
\[NoBreak]\\!\\(\\*StyleBox[\\!\\(\[FormalC]\\), \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" is \
Protected.\\\\\\\"\\\", \\\"MT\\\"]\\) \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/wrsym\\\", \
ButtonNote -> \\\"Clear::wrsym\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.503634425*^9, 3.5036345588125*^9, 3.503651243609375*^9, 
  3.503701755484375*^9, 3.503741728*^9, 3.503787563640625*^9, 
  3.503806050890625*^9, 3.504220265546875*^9, 3.504253634328125*^9, 
  3.5044128974375*^9, 3.504478584125*^9, 3.50451298715625*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"General", "::", "\<\"stop\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Further output of \\\\\\\"\\\", \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\!\\(Clear :: \\\"wrsym\\\"\\), \\\
\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" will be suppressed \
during this calculation.\\\\\\\"\\\", \\\"MT\\\"]\\) \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.503634425*^9, 3.5036345588125*^9, 3.503651243609375*^9, 
  3.503701755484375*^9, 3.503741728*^9, 3.503787563640625*^9, 
  3.503806050890625*^9, 3.504220265546875*^9, 3.504253634328125*^9, 
  3.5044128974375*^9, 3.504478584125*^9, 3.50451298715625*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"<<", "Data`"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"<<", "Bisfit`"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"<<", "Matcher`"}], ";"}]}], "Input",
 CellChangeTimes->{{3.510911354296875*^9, 3.510911357453125*^9}, {
  3.510911847640625*^9, 3.510911851015625*^9}, {3.510914942765625*^9, 
  3.510914946828125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"dd", "=", 
     RowBox[{"Reap", "[", "\[IndentingNewLine]", 
      RowBox[{"For", "[", 
       RowBox[{
        RowBox[{"i", "=", "51"}], ",", 
        RowBox[{"i", "\[LessEqual]", "81"}], ",", 
        RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Sow", "[", 
          RowBox[{"Import", "[", 
           RowBox[{
            RowBox[{"\"\<ca_\>\"", "<>", 
             RowBox[{"ToString", "[", "i", "]"}], "<>", "\"\<.txt\>\""}], 
            ",", "\"\<Table\>\""}], "]"}], "]"}], ";"}]}], 
       "\[IndentingNewLine]", "]"}], "]"}]}], ";", "\n", 
    RowBox[{
     RowBox[{"Dimensions", "[", 
      RowBox[{"dd", "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "1"}], "]"}], "]"}], "]"}], "\[IndentingNewLine]", 
     RowBox[{"dd", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], ";"}]}]], "Input",
 CellChangeTimes->{{3.503634325109375*^9, 3.50363442*^9}, 3.5036411*^9, 
   3.50364115565625*^9, {3.510911341453125*^9, 3.510911344765625*^9}, {
   3.510911628984375*^9, 3.5109116305*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"data", "=", 
   RowBox[{"ColeData", "[", "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Dimensions", "[", "data", "]"}]}], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.5036346468125*^9, 3.503634657859375*^9}, {
   3.503634689765625*^9, 3.50363469578125*^9}, {3.50363517571875*^9, 
   3.503635178515625*^9}, {3.503636182640625*^9, 3.50363619778125*^9}, {
   3.50363624871875*^9, 3.50363628246875*^9}, {3.503637978953125*^9, 
   3.503637979203125*^9}, {3.50363872584375*^9, 3.503638749765625*^9}, 
   3.503714666109375*^9, {3.50372526459375*^9, 3.503725279875*^9}, 
   3.503739811375*^9, {3.51091134865625*^9, 3.510911406734375*^9}, {
   3.510911583703125*^9, 3.5109115855*^9}, {3.510911858140625*^9, 
   3.5109119614375*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"32", ",", "8", ",", "4"}], "}"}]], "Output",
 CellChangeTimes->{3.510913408375*^9}],

Cell[CellGroupData[{

Cell["how is cole fit data", "Section",
 CellChangeTimes->{{3.51091346428125*^9, 3.510913491421875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Max", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "1"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "2"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "3"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "4"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "1"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "2"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "3"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"data", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "4"}], "]"}], "]"}], "]"}]}], "Input",
 CellChangeTimes->{{3.510913341*^9, 3.510913382671875*^9}}],

Cell[BoxData[
 RowBox[{"Max", "[", 
  RowBox[{
  "1.5723550279740887`*^6", 
   ",", "\<\"51.52257803911647+56.311895874767295*I\"\>", 
   ",", "\<\"98.13004269718655+80.01678387340989*I\"\>", 
   ",", "\<\"98.67911505275761+25.09819021181368*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416125*^9}],

Cell[BoxData[
 RowBox[{"Max", "[", 
  RowBox[{
  "110.99140224896837`", 
   ",", "\<\"51.52257803911647-56.311895874767295*I\"\>", 
   ",", "\<\"98.13004269718655-80.01678387340989*I\"\>", 
   ",", "\<\"98.67911505275761-25.09819021181368*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416125*^9}],

Cell[BoxData[
 RowBox[{"Max", "[", 
  RowBox[{
  "1.8555665139242934`", ",", "\<\"2.-0.2052493825986385*I\"\>", 
   ",", "\<\"2.-0.3745258442098394*I\"\>", 
   ",", "\<\"2.-0.47714002680445233*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416125*^9}],

Cell[BoxData["3.2730602210716455`*^28"], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416140625*^9}],

Cell[BoxData[
 RowBox[{"Min", "[", 
  RowBox[{
  "66.60846223494971`", ",", "\<\"51.52257803911647+56.311895874767295*I\"\>",
    ",", "\<\"98.13004269718655+80.01678387340989*I\"\>", 
   ",", "\<\"98.67911505275761+25.09819021181368*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416140625*^9}],

Cell[BoxData[
 RowBox[{"Min", "[", 
  RowBox[{
   RowBox[{"-", "915542.8556383864`"}], 
   ",", "\<\"51.52257803911647-56.311895874767295*I\"\>", 
   ",", "\<\"98.13004269718655-80.01678387340989*I\"\>", 
   ",", "\<\"98.67911505275761-25.09819021181368*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416140625*^9}],

Cell[BoxData[
 RowBox[{"Min", "[", 
  RowBox[{
  "0.17378062112226422`", ",", "\<\"2.-0.2052493825986385*I\"\>", 
   ",", "\<\"2.-0.3745258442098394*I\"\>", 
   ",", "\<\"2.-0.47714002680445233*I\"\>"}], "]"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416140625*^9}],

Cell[BoxData[
 RowBox[{"-", "503447.03540473006`"}]], "Output",
 CellChangeTimes->{3.510913383953125*^9, 3.510913416140625*^9}]
}, Closed]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"filter", " ", "fitted", " ", "data"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{
    "there", " ", "are", " ", "some", " ", "imaginary", " ", "numbers"}], ",",
     " ", 
    RowBox[{"must", " ", "remove", " ", "them"}]}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"fdata", "=", 
     RowBox[{"Map", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Filterd", "[", "#", "]"}], "&"}], ",", "data"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{"Dimensions", "[", "%", "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Total", "[", 
     RowBox[{
      RowBox[{"Map", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Dimensions", "[", "#", "]"}], "&"}], ",", "fdata"}], "]"}], 
      "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "1"}], "]"}], "]"}], "]"}], "/", 
    RowBox[{"(", 
     RowBox[{"32", "*", "8"}], ")"}]}]}]}]], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.5036346468125*^9, 3.503634657859375*^9}, {
   3.503634689765625*^9, 3.50363469578125*^9}, {3.50363517571875*^9, 
   3.503635178515625*^9}, {3.503636182640625*^9, 3.50363619778125*^9}, {
   3.50363624871875*^9, 3.50363628246875*^9}, {3.503637978953125*^9, 
   3.503637979203125*^9}, {3.50363872584375*^9, 3.503638749765625*^9}, 
   3.503714666109375*^9, {3.50372526459375*^9, 3.503725279875*^9}, 
   3.503739811375*^9, {3.51091134865625*^9, 3.510911406734375*^9}, {
   3.510911583703125*^9, 3.5109115855*^9}, {3.510911858140625*^9, 
   3.510912011609375*^9}, {3.510912047140625*^9, 3.510912047625*^9}, {
   3.510912747453125*^9, 3.51091277453125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Max", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "1"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "2"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "3"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "4"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "1"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "2"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "3"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Min", "[", 
  RowBox[{"fdata", "[", 
   RowBox[{"[", 
    RowBox[{";;", ",", ";;", ",", "4"}], "]"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"Mean", "[", 
    RowBox[{"Flatten", "[", 
     RowBox[{"fdata", "[", 
      RowBox[{"[", 
       RowBox[{";;", ",", ";;", ",", "i"}], "]"}], "]"}], "]"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "4"}], "}"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"this", " ", "looks", " ", "more", " ", "reasonable"}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.51091349959375*^9, 3.51091350396875*^9}, {
  3.51091359034375*^9, 3.510913654828125*^9}, {3.510913688828125*^9, 
  3.5109136946875*^9}}],

Cell[BoxData["161.6064993592518`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["74.34904194587668`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["0.8979990431139417`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["99489.9925740142`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["77.49935048679612`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["27.763706639785994`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.51091369628125*^9}],

Cell[BoxData["0.3614359519130071`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.510913696296875*^9}],

Cell[BoxData["2942.164774313387`"], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.510913696296875*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "102.69799569910158`", ",", "48.4969726242149`", ",", "0.6829717619964752`",
    ",", "32407.906869724957`"}], "}"}]], "Output",
 CellChangeTimes->{3.510913505234375*^9, 3.51091365634375*^9, 
  3.510913696296875*^9}]
}, Closed]],

Cell["\<\
The 4th measure is interesting, why is it like this...\
\>", "Text",
 CellChangeTimes->{{3.510913168890625*^9, 3.510913203953125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", 
    RowBox[{
     RowBox[{"fdata", "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "All", ",", "i"}], "]"}], "]"}], ",", 
     RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "4"}], "}"}]}], "]"}]], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.5109130940625*^9, 3.510913122140625*^9}, 
   3.510913154765625*^9, {3.510913301921875*^9, 3.510913311140625*^9}, {
   3.510913729484375*^9, 3.5109137559375*^9}, 3.510913801984375*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   GraphicsBox[{
     {Hue[0.67, 0.6, 0.6], 
      LineBox[{{1., 77.49935048679612}, {2., 79.39942081015083}, {3., 
       83.27069228786705}, {4., 77.89607594927853}, {5., 78.57020648694217}, {
       6., 79.27765716820895}, {7., 86.72950754945772}, {8., 
       87.76430189176315}}]}, 
     {Hue[0.9060679774997897, 0.6, 0.6], 
      LineBox[{{1., 87.3172882832291}, {2., 88.54029145239878}, {3., 
       93.12951037954039}, {4., 94.89667370168392}, {5., 87.52592538170617}, {
       6., 88.36273638100546}, {7., 88.59980403182057}, {8., 
       91.57754342391647}}]}, 
     {Hue[0.14213595499957954`, 0.6, 0.6], 
      LineBox[{{1., 97.59229686234721}, {2., 98.68284781602763}, {3., 
       99.21197564201091}, {4., 105.91537658908555`}, {5., 
       97.7244102221912}, {6., 99.5520096140989}, {7., 100.01927357545406`}, {
       8., 102.34592508259496`}}]}, 
     {Hue[0.37820393249936934`, 0.6, 0.6], 
      LineBox[{{1., 99.49305310164895}, {2., 100.88492974736806`}, {3., 
       100.90090865186033`}, {4., 101.31437302631484`}, {5., 
       100.1355246109505}, {6., 101.02971139561588`}, {7., 
       101.2272604022325}, {8., 101.38441387481734`}}]}, 
     {Hue[0.6142719099991583, 0.6, 0.6], 
      LineBox[{{1., 101.27111497661267`}, {2., 101.37514723888255`}, {3., 
       101.14184978514926`}, {4., 101.9529797790423}, {5., 
       98.34941550502919}, {6., 98.58234158742745}, {7., 98.92302194153555}, {
       8., 101.24982521640686`}}]}, 
     {Hue[0.8503398874989481, 0.6, 0.6], 
      LineBox[{{1., 130.469859115722}, {2., 134.37765028235106`}, {3., 
       133.13258892560722`}, {4., 139.4170167013783}}]}, 
     {Hue[0.08640786499873876, 0.6, 0.6], 
      LineBox[{{1., 89.7014175508535}, {2., 90.19286954246054}, {3., 
       89.93750426110556}, {4., 90.12857440478972}, {5., 90.1278302646343}, {
       6., 89.90449275288863}, {7., 90.19556847046647}, {8., 
       94.02310455294271}}]}, 
     {Hue[0.3224758424985268, 0.6, 0.6], 
      LineBox[{{1., 130.61072269688694`}, {2., 133.42696261157863`}, {3., 
       133.39039368141576`}, {4., 153.09362424877474`}, {5., 
       129.99138891651356`}, {6., 131.3879967604013}, {7., 
       132.05866975272707`}, {8., 134.27243283429826`}}]}, 
     {Hue[0.5585438199983166, 0.6, 0.6], 
      LineBox[{{1., 96.52741294639827}, {2., 97.63355475845088}, {3., 
       117.61850492943448`}, {4., 118.6410610951333}, {5., 
       95.94637767603625}, {6., 96.70109800757042}, {7., 104.8489853503771}, {
       8., 121.17885246318409`}}]}, 
     {Hue[0.7946117974981064, 0.6, 0.6], 
      LineBox[{{1., 131.9096100799475}, {2., 135.849020066103}, {3., 
       140.2979981807369}, {4., 142.55276913298056`}}]}, 
     {Hue[0.030679774997896203`, 0.6, 0.6], 
      LineBox[{{1., 120.6289811148124}, {2., 122.06409374641979`}, {3., 
       122.69144938570844`}, {4., 161.6064993592518}, {5., 
       122.86920354911784`}, {6., 123.66680565923988`}, {7., 
       123.53066380971924`}, {8., 128.1148447433702}}]}, 
     {Hue[0.266747752497686, 0.6, 0.6], 
      LineBox[{{1., 132.98715407873422`}, {2., 136.78580557931238`}, {3., 
       136.50765081052486`}, {4., 143.8934414550748}, {5., 
       129.82794316689095`}, {6., 132.67790178704368`}, {7., 
       131.7895019425805}, {8., 134.35303780622223`}}]}, 
     {Hue[0.5028157299974758, 0.6, 0.6], 
      LineBox[{{1., 114.68104327144981`}, {2., 121.1055081944744}}]}, 
     {Hue[0.7388837074972656, 0.6, 0.6], 
      LineBox[{{1., 104.28856317089507`}, {2., 106.741439709395}, {3., 
       109.22689493716483`}, {4., 113.56894327709426`}, {5., 
       104.32820135661834`}, {6., 104.18096414154437`}, {7., 
       104.42119695120164`}, {8., 117.29574784825897`}}]}, 
     {Hue[0.9749516849970554, 0.6, 0.6], 
      LineBox[{{1., 98.0526250506521}, {2., 100.19846247572599`}, {3., 
       120.98707357706729`}, {4., 111.64726445643242`}, {5., 
       110.80009066925754`}, {6., 113.59468613052678`}, {7., 
       108.3723549887732}}]}, 
     {Hue[0.21101966249684523`, 0.6, 0.6], 
      LineBox[{{1., 115.74100119737648`}, {2., 113.33294201883618`}, {3., 
       120.69201112008832`}, {4., 112.50983944238467`}, {5., 
       113.52194751331488`}, {6., 113.47805568205135`}, {7., 
       114.08962403916455`}}]}, 
     {Hue[0.44708763999663503`, 0.6, 0.6], 
      LineBox[{{1., 84.79689956155084}, {2., 85.33658452981796}, {3., 
       126.74150163871928`}, {4., 113.31264921523427`}, {5., 
       83.84921586142993}, {6., 84.0842800280297}, {7., 83.94482542276401}, {
       8., 84.9720148142242}}]}, 
     {Hue[0.6831556174964248, 0.6, 0.6], 
      LineBox[{{1., 100.52545918600977`}, {2., 102.6197720380977}, {3., 
       102.73490724680705`}, {4., 103.34385757776714`}, {5., 
       101.18302277579626`}, {6., 102.21550745726988`}, {7., 
       101.88852773391015`}, {8., 101.8785039633414}}]}, 
     {Hue[0.9192235949962146, 0.6, 0.6], 
      LineBox[{{1., 109.73511113864416`}, {2., 111.57161747860803`}, {3., 
       123.11605599379314`}, {4., 131.8904897056564}, {5., 
       107.67749872737747`}, {6., 109.30168034801646`}, {7., 
       109.14220021834433`}, {8., 110.7845246326334}}]}, 
     {Hue[0.15529157249600445`, 0.6, 0.6], 
      LineBox[{{1., 90.07690624102372}, {2., 91.80457202056778}, {3., 
       91.41090686689729}, {4., 92.91884277763785}, {5., 90.09167971881574}, {
       6., 91.45694432788254}, {7., 95.79716416575066}, {8., 
       111.10677656180331`}}]}, 
     {Hue[0.39135954999579425`, 0.6, 0.6], 
      LineBox[{{1., 82.62975245307635}, {2., 84.14554106654435}, {3., 
       85.74310358347682}, {4., 85.45414629792727}, {5., 85.86215112687213}, {
       6., 87.10933492586696}, {7., 87.43083250297344}, {8., 
       93.7419552145734}}]}, 
     {Hue[0.6274275274955841, 0.6, 0.6], 
      LineBox[{{1., 106.43698074039159`}, {2., 106.816809518687}, {3., 
       106.69483344472785`}, {4., 111.51854757360432`}, {5., 
       106.38827733387551`}, {6., 106.98774814709836`}, {7., 
       107.00761439069993`}, {8., 113.82564950090041`}}]}, 
     {Hue[0.8634955049953739, 0.6, 0.6], 
      LineBox[{{1., 92.25258502688061}, {2., 94.36890781830638}, {3., 
       93.86132808058932}, {4., 98.94010409897406}, {5., 93.4749240133632}, {
       6., 94.51044070001896}, {7., 94.76069985007955}, {8., 
       99.3450320419355}}]}, 
     {Hue[0.09956348249516367, 0.6, 0.6], 
      LineBox[{{1., 90.28624647851753}, {2., 91.90990668591988}, {3., 
       92.0020758342654}, {4., 152.11495754987183`}, {5., 
       91.59883860822927}, {6., 92.57196676144207}, {7., 92.65618240264541}, {
       8., 96.39867613124447}}]}, 
     {Hue[0.3356314599949535, 0.6, 0.6], 
      LineBox[{{1., 80.2074282986678}, {2., 80.76213576894474}, {3., 
       81.50173992835238}, {4., 87.24918663809706}, {5., 79.6678239171129}, {
       6., 79.80738438595591}, {7., 80.05584773186112}, {8., 
       81.6476590853778}}]}, 
     {Hue[0.5716994374947397, 0.6, 0.6], 
      LineBox[{{1., 91.86269089122194}, {2., 94.43229804472946}, {3., 
       99.28845213940473}, {4., 101.28166233471673`}, {5., 
       92.33667680598451}, {6., 93.43734231494484}, {7., 93.95506937934923}, {
       8., 93.79255548122077}}]}, 
     {Hue[0.8077674149945295, 0.6, 0.6], 
      LineBox[{{1., 80.5540114841225}, {2., 82.49701963600714}, {3., 
       83.01895577809826}, {4., 86.8414024455029}, {5., 79.77509525258705}, {
       6., 81.12879975991676}, {7., 93.4653437643584}, {8., 
       95.16735757024009}}]}, 
     {Hue[0.04383539249432289, 0.6, 0.6], 
      LineBox[{{1., 85.94430926849057}, {2., 86.52219836946712}, {3., 
       86.99458588365802}, {4., 90.18011990414936}, {5., 86.06298445433424}, {
       6., 86.4835065665104}, {7., 86.6247882344937}, {8., 
       87.03415228378992}}]}, 
     {Hue[0.27990336999410914`, 0.6, 0.6], 
      LineBox[{{1., 93.12747691998953}, {2., 92.81715514528287}, {3., 
       94.2316981718913}, {4., 92.13045533038432}, {5., 93.5389211249666}, {
       6., 93.64410531293143}, {7., 94.06252197573835}}]}, 
     {Hue[0.5159713474939025, 0.6, 0.6], 
      LineBox[{{1., 92.43492193983403}, {2., 92.95697763399853}, {3., 
       93.20915989515792}, {4., 96.97447422349755}, {5., 92.11388066947421}, {
       6., 92.36476489959217}, {7., 95.9636595803483}, {8., 
       129.98824737668963`}}]}, 
     {Hue[0.7520393249936888, 0.6, 0.6], 
      LineBox[{{1., 94.51486589571074}, {2., 96.29021833001813}, {3., 
       96.2451240547986}, {4., 99.21348063806326}, {5., 93.74458242224026}, {
       6., 95.35185928228113}, {7., 94.72739167574781}, {8., 
       96.31603500530416}}]}, 
     {Hue[0.9881073024934821, 0.6, 0.6], 
      LineBox[{{1., 102.69733276579969`}, {2., 102.86656359646099`}, {3., 
       104.16980045437853`}, {4., 159.32171729854429`}, {5., 
       102.91712700954719`}, {6., 104.57005944505639`}, {7., 
       106.28698931840562`}, {8., 125.27782687528676`}}]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->True,
    AxesOrigin->{0, Automatic},
    ImageSize->{310., Automatic},
    PlotRange->Automatic,
    PlotRangeClipping->True], ",", 
   GraphicsBox[{
     {Hue[0.67, 0.6, 0.6], 
      LineBox[{{1., 40.182983622054934`}, {2., 39.97779296406853}, {3., 
       38.84012591541979}, {4., 39.003147282028586`}, {5., 
       38.562623028033705`}, {6., 38.774114824167334`}, {7., 
       37.67107227050285}, {8., 32.74605078707478}}]}, 
     {Hue[0.9060679774997897, 0.6, 0.6], 
      LineBox[{{1., 44.98434151664053}, {2., 44.36324321351486}, {3., 
       43.88905773737261}, {4., 41.50466864424574}, {5., 44.73515009247719}, {
       6., 44.540779720587594`}, {7., 44.611402207170826`}, {8., 
       44.30604978546065}}]}, 
     {Hue[0.14213595499957954`, 0.6, 0.6], 
      LineBox[{{1., 51.034305342593825`}, {2., 50.4230345635081}, {3., 
       50.560593640117396`}, {4., 48.91398198112748}, {5., 
       51.12751187111728}, {6., 50.329510678152914`}, {7., 
       50.6211384407302}, {8., 50.40896904663714}}]}, 
     {Hue[0.37820393249936934`, 0.6, 0.6], 
      LineBox[{{1., 43.78866764431562}, {2., 43.2862572443087}, {3., 
       43.292520715452724`}, {4., 43.49992335520729}, {5., 
       43.55008419904085}, {6., 43.157599134645594`}, {7., 
       43.09913852666918}, {8., 43.242005066517436`}}]}, 
     {Hue[0.6142719099991583, 0.6, 0.6], 
      LineBox[{{1., 47.614493346887265`}, {2., 47.526697465681636`}, {3., 
       47.75573784363699}, {4., 47.84760050034282}, {5., 
       46.372458952798446`}, {6., 46.2405743915336}, {7., 
       46.24414114071311}, {8., 46.092118612136574`}}]}, 
     {Hue[0.8503398874989481, 0.6, 0.6], 
      LineBox[{{1., 53.65848705302667}, {2., 57.155274860959224`}, {3., 
       58.79528701774752}, {4., 58.67649890013036}}]}, 
     {Hue[0.08640786499873876, 0.6, 0.6], 
      LineBox[{{1., 39.14500935609892}, {2., 39.02405393422596}, {3., 
       38.99973836209328}, {4., 39.01264664410412}, {5., 47.33769753790426}, {
       6., 47.24808267411201}, {7., 47.276019484572466`}, {8., 
       40.58119987858261}}]}, 
     {Hue[0.3224758424985268, 0.6, 0.6], 
      LineBox[{{1., 72.53744639167485}, {2., 71.4800719409824}, {3., 
       71.79849579740875}, {4., 67.93992505759235}, {5., 71.59031114808587}, {
       6., 71.16260714988924}, {7., 71.09495770540872}, {8., 
       71.18855554295483}}]}, 
     {Hue[0.5585438199983166, 0.6, 0.6], 
      LineBox[{{1., 44.80337181184146}, {2., 44.61621993853606}, {3., 
       41.06654535473571}, {4., 35.86310480614233}, {5., 
       44.644757540913176`}, {6., 44.246493380333945`}, {7., 
       42.88091964532812}, {8., 35.581243536504495`}}]}, 
     {Hue[0.7946117974981064, 0.6, 0.6], 
      LineBox[{{1., 68.59310042921042}, {2., 69.15695326056667}, {3., 
       65.34331678150946}, {4., 63.65344166070141}}]}, 
     {Hue[0.030679774997896203`, 0.6, 0.6], 
      LineBox[{{1., 63.41946961271736}, {2., 63.2046392844521}, {3., 
       63.7033801233927}, {4., 56.40639115390145}, {5., 
       63.804456658431675`}, {6., 63.33001179949005}, {7., 
       63.47064556217817}, {8., 62.742465812511035`}}]}, 
     {Hue[0.266747752497686, 0.6, 0.6], 
      LineBox[{{1., 74.29683343100653}, {2., 72.85757832621766}, {3., 
       72.97479772095393}, {4., 71.51926388486342}, {5., 74.34904194587668}, {
       6., 72.13536057279089}, {7., 72.98957824061569}, {8., 
       73.04568311486096}}]}, 
     {Hue[0.5028157299974758, 0.6, 0.6], 
      LineBox[{{1., 66.26860191814866}, {2., 62.7889185115607}}]}, 
     {Hue[0.7388837074972656, 0.6, 0.6], 
      LineBox[{{1., 65.06231089745656}, {2., 61.80358464454468}, {3., 
       61.73103607682252}, {4., 60.73837876179244}, {5., 58.96091595958844}, {
       6., 58.927113590123035`}, {7., 58.94275715341027}, {8., 
       56.82601553486478}}]}, 
     {Hue[0.9749516849970554, 0.6, 0.6], 
      LineBox[{{1., 51.12032780718414}, {2., 50.82750047138368}, {3., 
       46.90141371523436}, {4., 47.19272088998736}, {5., 
       51.026542183802945`}, {6., 47.107135419431025`}, {7., 
       46.267817625329094`}}]}, 
     {Hue[0.21101966249684523`, 0.6, 0.6], 
      LineBox[{{1., 62.62710667384661}, {2., 60.93101945954512}, {3., 
       60.62301674227461}, {4., 52.558062514147764`}, {5., 
       52.90463590332281}, {6., 52.578122897734545`}, {7., 
       52.80853188298674}}]}, 
     {Hue[0.44708763999663503`, 0.6, 0.6], 
      LineBox[{{1., 37.239928498718385`}, {2., 37.21559401256994}, {3., 
       29.24442897133867}, {4., 27.763706639785994`}, {5., 
       38.403499126639105`}, {6., 38.44655461119811}, {7., 
       38.41276349114251}, {8., 38.0809599337512}}]}, 
     {Hue[0.6831556174964248, 0.6, 0.6], 
      LineBox[{{1., 58.740403997504686`}, {2., 56.34091295127388}, {3., 
       56.11135876474653}, {4., 56.348097205334014`}, {5., 
       57.782899301966765`}, {6., 57.21648413689623}, {7., 
       57.75711056652527}, {8., 62.1964586146252}}]}, 
     {Hue[0.9192235949962146, 0.6, 0.6], 
      LineBox[{{1., 62.27143184842248}, {2., 61.651222318934174`}, {3., 
       59.85328322884121}, {4., 53.156841212592745`}, {5., 
       62.22873154818984}, {6., 61.42284235107299}, {7., 
       61.940416949401026`}, {8., 61.764049064056564`}}]}, 
     {Hue[0.15529157249600445`, 0.6, 0.6], 
      LineBox[{{1., 43.94863899736811}, {2., 43.406437654783076`}, {3., 
       43.57685865173762}, {4., 43.5461067761377}, {5., 
       43.390342902047124`}, {6., 42.89881190190535}, {7., 
       42.8285944318646}, {8., 38.08439457848095}}]}, 
     {Hue[0.39135954999579425`, 0.6, 0.6], 
      LineBox[{{1., 45.794169111594165`}, {2., 45.76317757868066}, {3., 
       45.500884877632245`}, {4., 45.93042433196784}, {5., 
       46.5274217884571}, {6., 46.1063381870247}, {7., 45.92606939185903}, {
       8., 44.740401123740455`}}]}, 
     {Hue[0.6274275274955841, 0.6, 0.6], 
      LineBox[{{1., 48.10880405754199}, {2., 47.838720705940204`}, {3., 
       47.88898388705009}, {4., 47.23392796581375}, {5., 47.6025100834449}, {
       6., 47.36975779556852}, {7., 47.40573221523803}, {8., 
       46.41029148496314}}]}, 
     {Hue[0.8634955049953739, 0.6, 0.6], 
      LineBox[{{1., 43.43227279586216}, {2., 42.205663172433844`}, {3., 
       42.48070685242166}, {4., 41.722223710652614`}, {5., 
       42.057885472056874`}, {6., 41.75474203720208}, {7., 
       41.79996577188858}, {8., 41.09633538575699}}]}, 
     {Hue[0.09956348249516367, 0.6, 0.6], 
      LineBox[{{1., 40.60917419061586}, {2., 40.48602581990892}, {3., 
       40.60441397256302}, {4., 28.07227806309288}, {5., 
       40.662207094897234`}, {6., 40.42733981462309}, {7., 
       40.5920229945269}, {8., 40.16346187934384}}]}, 
     {Hue[0.3356314599949535, 0.6, 0.6], 
      LineBox[{{1., 43.68264044888623}, {2., 43.534391911057696`}, {3., 
       43.44970096910994}, {4., 42.18099462838964}, {5., 43.08085647928574}, {
       6., 43.28698213564976}, {7., 43.17726254952928}, {8., 
       42.93651817158243}}]}, 
     {Hue[0.5716994374947397, 0.6, 0.6], 
      LineBox[{{1., 41.78694480104315}, {2., 41.47169850586482}, {3., 
       40.42540416314647}, {4., 39.995633425635546`}, {5., 
       42.522425061472646`}, {6., 42.25223461728966}, {7., 
       41.858311662009235`}, {8., 41.92765829578664}}]}, 
     {Hue[0.8077674149945295, 0.6, 0.6], 
      LineBox[{{1., 38.00386836377968}, {2., 37.31719229788439}, {3., 
       37.264720578431934`}, {4., 36.48056232675631}, {5., 
       37.71535606243575}, {6., 37.16273351072225}, {7., 35.42260590799229}, {
       8., 28.96973969408458}}]}, 
     {Hue[0.04383539249432289, 0.6, 0.6], 
      LineBox[{{1., 34.70475342383824}, {2., 34.633441310652515`}, {3., 
       34.51081687250476}, {4., 34.36393875703882}, {5., 34.57329070320019}, {
       6., 34.50727805623518}, {7., 34.52450226884152}, {8., 
       34.53237958585318}}]}, 
     {Hue[0.27990336999410914`, 0.6, 0.6], 
      LineBox[{{1., 47.07506044477808}, {2., 47.00416945031327}, {3., 
       47.1959470872216}, {4., 47.637291407522795`}, {5., 
       47.02356821233724}, {6., 47.02430764799044}, {7., 
       47.307457186248456`}}]}, 
     {Hue[0.5159713474939025, 0.6, 0.6], 
      LineBox[{{1., 40.77741403725153}, {2., 40.70241331594799}, {3., 
       40.63556445030348}, {4., 40.14464834210146}, {5., 40.99331822084253}, {
       6., 41.12001176163635}, {7., 40.618507283933}, {8., 
       29.006650550230162`}}]}, 
     {Hue[0.7520393249936888, 0.6, 0.6], 
      LineBox[{{1., 51.293322675377894`}, {2., 50.803835330673465`}, {3., 
       50.66044144607559}, {4., 50.4952837390361}, {5., 51.43589418649239}, {
       6., 50.48547642411968}, {7., 50.51819535091949}, {8., 
       50.49561971299492}}]}, 
     {Hue[0.9881073024934821, 0.6, 0.6], 
      LineBox[{{1., 50.54314390467364}, {2., 49.77409349224402}, {3., 
       49.045179546824805`}, {4., 37.78606387253715}, {5., 
       50.30500593151229}, {6., 49.45667480150948}, {7., 49.16868304176619}, {
       8., 41.75519155438667}}]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->True,
    AxesOrigin->{0, Automatic},
    ImageSize->{327.5000000000001, Automatic},
    PlotRange->Automatic,
    PlotRangeClipping->True], ",", 
   GraphicsBox[{
     {Hue[0.67, 0.6, 0.6], 
      LineBox[{{1., 0.7954316996367393}, {2., 0.7617614278801564}, {3., 
       0.6973460234058789}, {4., 0.7961474031891772}, {5., 
       0.7812755107159876}, {6., 0.7729750109309161}, {7., 
       0.6732859364419232}, {8., 0.5995228692231473}}]}, 
     {Hue[0.9060679774997897, 0.6, 0.6], 
      LineBox[{{1., 0.8539026546144708}, {2., 0.8248491191670861}, {3., 
       0.7703559248827241}, {4., 0.7128186080127923}, {5., 
       0.8344603037864268}, {6., 0.816232196381215}, {7., 
       0.8148706917529959}, {8., 0.7811726719094263}}]}, 
     {Hue[0.14213595499957954`, 0.6, 0.6], 
      LineBox[{{1., 0.7859830088465208}, {2., 0.752231238443353}, {3., 
       0.7491176213904281}, {4., 0.6719048117330699}, {5., 
       0.7945528161413742}, {6., 0.7519724286495268}, {7., 
       0.7518269694741423}, {8., 0.7302774739142903}}]}, 
     {Hue[0.37820393249936934`, 0.6, 0.6], 
      LineBox[{{1., 0.7756771374229684}, {2., 0.751645384211181}, {3., 
       0.7533704173611744}, {4., 0.7539161257379169}, {5., 
       0.7768405999695323}, {6., 0.7590069661384646}, {7., 
       0.7560919437711776}, {8., 0.7568375212640873}}]}, 
     {Hue[0.6142719099991583, 0.6, 0.6], 
      LineBox[{{1., 0.6315762795978619}, {2., 0.6305482389192829}, {3., 
       0.6356299627666774}, {4., 0.6289836343410518}, {5., 
       0.6404394044729703}, {6., 0.6354081389634859}, {7., 
       0.6316158236116886}, {8., 0.611209192066757}}]}, 
     {Hue[0.8503398874989481, 0.6, 0.6], 
      LineBox[{{1., 0.7687375181894249}, {2., 0.7955876222321665}, {3., 
       0.8175538927610784}, {4., 0.7782497147143128}}]}, 
     {Hue[0.08640786499873876, 0.6, 0.6], 
      LineBox[{{1., 0.7292429721227675}, {2., 0.7209515104220362}, {3., 
       0.7174399232147141}, {4., 0.7146235768994649}, {5., 
       0.8418652874643394}, {6., 0.8436016137125079}, {7., 
       0.842295495335922}, {8., 0.6995726476981629}}]}, 
     {Hue[0.3224758424985268, 0.6, 0.6], 
      LineBox[{{1., 0.6959642237254098}, {2., 0.654324222457345}, {3., 
       0.6602376553336117}, {4., 0.513303324006628}, {5., 
       0.6999299347722645}, {6., 0.6773039640166524}, {7., 
       0.6687341796068695}, {8., 0.6586114194966451}}]}, 
     {Hue[0.5585438199983166, 0.6, 0.6], 
      LineBox[{{1., 0.7042879774525695}, {2., 0.6930788262519224}, {3., 
       0.5239596586110999}, {4., 0.47436683949660935`}, {5., 
       0.7083958043146263}, {6., 0.6937826036016929}, {7., 
       0.6199930342213462}, {8., 0.4728056848319376}}]}, 
     {Hue[0.7946117974981064, 0.6, 0.6], 
      LineBox[{{1., 0.6355351718101897}, {2., 0.612354566105499}, {3., 
       0.5503411983833219}, {4., 0.5262387885568593}}]}, 
     {Hue[0.030679774997896203`, 0.6, 0.6], 
      LineBox[{{1., 0.6787299101678073}, {2., 0.6573434632651729}, {3., 
       0.6600337559810855}, {4., 0.4157188511038888}, {5., 
       0.6572159396378312}, {6., 0.6407079640885406}, {7., 
       0.645624079630129}, {8., 0.6059436354331863}}]}, 
     {Hue[0.266747752497686, 0.6, 0.6], 
      LineBox[{{1., 0.6314989279724086}, {2., 0.5760613462871621}, {3., 
       0.5753906438544825}, {4., 0.5241080708099821}, {5., 
       0.6495960725521023}, {6., 0.5884847287804643}, {7., 
       0.6049348839151003}, {8., 0.5947129322500784}}]}, 
     {Hue[0.5028157299974758, 0.6, 0.6], 
      LineBox[{{1., 0.8979990431139417}, {2., 0.73401180735739}}]}, 
     {Hue[0.7388837074972656, 0.6, 0.6], 
      LineBox[{{1., 0.7925371188447807}, {2., 0.7007119187015841}, {3., 
       0.6750092374740625}, {4., 0.619794270365232}, {5., 
       0.664924187887124}, {6., 0.6610827037956668}, {7., 
       0.6579798774875997}, {8., 0.5275326353881792}}]}, 
     {Hue[0.9749516849970554, 0.6, 0.6], 
      LineBox[{{1., 0.7407719328751252}, {2., 0.7085235636401526}, {3., 
       0.5191166505576446}, {4., 0.5755936978926323}, {5., 
       0.616518758741202}, {6., 0.563706075091672}, {7., 
       0.5941822457751713}}]}, 
     {Hue[0.21101966249684523`, 0.6, 0.6], 
      LineBox[{{1., 0.7380510997512373}, {2., 0.7291290569941483}, {3., 
       0.6824100607256903}, {4., 0.6326130857004054}, {5., 
       0.6289383316860158}, {6., 0.6197679355987166}, {7., 
       0.619338911205604}}]}, 
     {Hue[0.44708763999663503`, 0.6, 0.6], 
      LineBox[{{1., 0.7017247459080753}, {2., 0.6947605563542676}, {3., 
       0.4094683731904389}, {4., 0.4377696039347188}, {5., 
       0.7138961458298785}, {6., 0.7097156037516698}, {7., 
       0.7074868564048047}, {8., 0.6923794841335197}}]}, 
     {Hue[0.6831556174964248, 0.6, 0.6], 
      LineBox[{{1., 0.6759837344893606}, {2., 0.6187865683106402}, {3., 
       0.615373712077187}, {4., 0.6163181389494036}, {5., 
       0.6597123384122566}, {6., 0.6362160301662292}, {7., 
       0.6496757181905185}, {8., 0.7134348862860154}}]}, 
     {Hue[0.9192235949962146, 0.6, 0.6], 
      LineBox[{{1., 0.6565631718709313}, {2., 0.6252612287736757}, {3., 
       0.5171223580025393}, {4., 0.4227410067213023}, {5., 
       0.6635039575918504}, {6., 0.6289189348251589}, {7., 
       0.6375244336060453}, {8., 0.6136902592742317}}]}, 
     {Hue[0.15529157249600445`, 0.6, 0.6], 
      LineBox[{{1., 0.7405997192830082}, {2., 0.7067577720770043}, {3., 
       0.7127956819096124}, {4., 0.7022675903459419}, {5., 
       0.7236061272320943}, {6., 0.6943564482778998}, {7., 
       0.662599551608605}, {8., 0.5116555921352681}}]}, 
     {Hue[0.39135954999579425`, 0.6, 0.6], 
      LineBox[{{1., 0.765611631058141}, {2., 0.7446594285244958}, {3., 
       0.7086741933822405}, {4., 0.7200224775092622}, {5., 
       0.7280109794588129}, {6., 0.6996283463540632}, {7., 
       0.692831770779448}, {8., 0.6116338552633283}}]}, 
     {Hue[0.6274275274955841, 0.6, 0.6], 
      LineBox[{{1., 0.7467526052940275}, {2., 0.7345385349146116}, {3., 
       0.7348407154865112}, {4., 0.68780787823837}, {5., 
       0.7439651121826529}, {6., 0.7343272325983868}, {7., 
       0.7358442434756837}, {8., 0.6756256208334512}}]}, 
     {Hue[0.8634955049953739, 0.6, 0.6], 
      LineBox[{{1., 0.7767209853807999}, {2., 0.7057942025803488}, {3., 
       0.713730975531758}, {4., 0.6619481490739838}, {5., 
       0.7189224906350438}, {6., 0.7021054465087919}, {7., 
       0.7001837008418497}, {8., 0.6559068238917044}}]}, 
     {Hue[0.09956348249516367, 0.6, 0.6], 
      LineBox[{{1., 0.7324636514298227}, {2., 0.7119197803086711}, {3., 
       0.7116510586786365}, {4., 0.3614359519130071}, {5., 
       0.7254819635841595}, {6., 0.7086210041625388}, {7., 
       0.7108410741824868}, {8., 0.6777773446439936}}]}, 
     {Hue[0.3356314599949535, 0.6, 0.6], 
      LineBox[{{1., 0.6872854844771152}, {2., 0.677491503300641}, {3., 
       0.6651841357577555}, {4., 0.5814005397181659}, {5., 
       0.6806649756405508}, {6., 0.6841679802900679}, {7., 
       0.678624648238906}, {8., 0.6549267642875236}}]}, 
     {Hue[0.5716994374947397, 0.6, 0.6], 
      LineBox[{{1., 0.7344358353067105}, {2., 0.701928053680323}, {3., 
       0.647444315965217}, {4., 0.6271782156992775}, {5., 
       0.7307734922394215}, {6., 0.7173442068390249}, {7., 
       0.7086729188870748}, {8., 0.7137465690731114}}]}, 
     {Hue[0.8077674149945295, 0.6, 0.6], 
      LineBox[{{1., 0.7537641688823555}, {2., 0.7144132168055478}, {3., 
       0.7091872974156357}, {4., 0.6663671677512292}, {5., 
       0.7470459662683948}, {6., 0.714243878459178}, {7., 
       0.5849841832635707}, {8., 0.5060965421752388}}]}, 
     {Hue[0.04383539249432289, 0.6, 0.6], 
      LineBox[{{1., 0.7466478068664951}, {2., 0.7367272248890788}, {3., 
       0.7274363542319879}, {4., 0.7019421451694211}, {5., 
       0.7293511391073908}, {6., 0.7209837494776503}, {7., 
       0.7200261258173148}, {8., 0.716324435468627}}]}, 
     {Hue[0.27990336999410914`, 0.6, 0.6], 
      LineBox[{{1., 0.7156008583269912}, {2., 0.7151295937339888}, {3., 
       0.7124645833243036}, {4., 0.739215398703768}, {5., 
       0.7051834438866091}, {6., 0.7025667557171542}, {7., 
       0.7044511102277125}}]}, 
     {Hue[0.5159713474939025, 0.6, 0.6], 
      LineBox[{{1., 0.6760834143971453}, {2., 0.6718346610476477}, {3., 
       0.6696840134857772}, {4., 0.636808771679722}, {5., 
       0.671653623773154}, {6., 0.6722799614744964}, {7., 
       0.6415996516267669}, {8., 0.3873463606828969}}]}, 
     {Hue[0.7520393249936888, 0.6, 0.6], 
      LineBox[{{1., 0.7959646225783539}, {2., 0.7559243904751893}, {3., 
       0.7521179349886987}, {4., 0.724979856444498}, {5., 
       0.7951999387124759}, {6., 0.7422694886915236}, {7., 
       0.7489485464000354}, {8., 0.7326676650829422}}]}, 
     {Hue[0.9881073024934821, 0.6, 0.6], 
      LineBox[{{1., 0.7825848971606644}, {2., 0.7685573239953343}, {3., 
       0.7339576118724594}, {4., 0.400018474424167}, {5., 
       0.7710401475851659}, {6., 0.7316499704470221}, {7., 
       0.7181409204546936}, {8., 0.5318790703405532}}]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->True,
    AxesOrigin->{0, Automatic},
    ImageSize->{315., Automatic},
    PlotRange->Automatic,
    PlotRangeClipping->True], ",", 
   GraphicsBox[{
     {Hue[0.67, 0.6, 0.6], 
      LineBox[{{1., 37041.83222263791}, {2., 35093.421142000305`}, {3., 
       40214.39069551425}, {4., 37410.783092827594`}, {5., 
       35461.249511310365`}, {6., 35354.786600215295`}, {7., 
       31140.167862129187`}, {8., 32656.219370232913`}}]}, 
     {Hue[0.9060679774997897, 0.6, 0.6], 
      LineBox[{{1., 29698.78148259216}, {2., 30623.59658214789}, {3., 
       33011.79365467187}, {4., 99489.9925740142}, {5., 31850.44447082786}, {
       6., 30856.462070476064`}, {7., 30975.76923469727}, {8., 
       29956.838726647256`}}]}, 
     {Hue[0.14213595499957954`, 0.6, 0.6], 
      LineBox[{{1., 33920.84873321282}, {2., 31905.149999811692`}, {3., 
       32146.268880779156`}, {4., 29604.59317398638}, {5., 
       34045.6687321626}, {6., 32007.483320797368`}, {7., 
       31824.617703526936`}, {8., 31254.97457454678}}]}, 
     {Hue[0.37820393249936934`, 0.6, 0.6], 
      LineBox[{{1., 34264.68498317714}, {2., 32807.02628172581}, {3., 
       33066.63601313444}, {4., 33177.52167601438}, {5., 
       34442.600712986066`}, {6., 33464.05421451439}, {7., 
       33349.103780291545`}, {8., 33485.90168234709}}]}, 
     {Hue[0.6142719099991583, 0.6, 0.6], 
      LineBox[{{1., 26605.721361327058`}, {2., 26938.500968925186`}, {3., 
       27161.62087418578}, {4., 26858.983497904046`}, {5., 
       26697.01184648968}, {6., 26982.304651317914`}, {7., 
       26330.82035948291}, {8., 24900.60284437134}}]}, 
     {Hue[0.8503398874989481, 0.6, 0.6], 
      LineBox[{{1., 17853.71368778854}, {2., 14504.270010065602`}, {3., 
       12094.309872511425`}, {4., 11331.943563754578`}}]}, 
     {Hue[0.08640786499873876, 0.6, 0.6], 
      LineBox[{{1., 28010.611969429658`}, {2., 27726.31119105203}, {3., 
       27869.337252498357`}, {4., 27766.623007733888`}, {5., 
       3157.885446819543}, {6., 4329.518417614178}, {7., 4690.339746230479}, {
       8., 26100.0807794891}}]}, 
     {Hue[0.3224758424985268, 0.6, 0.6], 
      LineBox[{{1., 32184.587110800137`}, {2., 29800.01284277154}, {3., 
       30387.1587410192}, {4., 20252.799193888637`}, {5., 
       32301.332301110946`}, {6., 30952.035625047076`}, {7., 
       31029.061136551172`}, {8., 30294.096762238227`}}]}, 
     {Hue[0.5585438199983166, 0.6, 0.6], 
      LineBox[{{1., 27104.74910970637}, {2., 28334.060114488428`}, {3., 
       18570.867783036396`}, {4., 21497.362868397995`}, {5., 
       28958.951021592922`}, {6., 28404.12515912551}, {7., 
       23654.59769429447}, {8., 21679.3484513727}}]}, 
     {Hue[0.7946117974981064, 0.6, 0.6], 
      LineBox[{{1., 37882.50463048543}, {2., 33455.29661878002}, {3., 
       32139.61384305447}, {4., 32173.322407664586`}}]}, 
     {Hue[0.030679774997896203`, 0.6, 0.6], 
      LineBox[{{1., 39257.10287591237}, {2., 37301.380851851354`}, {3., 
       37240.801017556194`}, {4., 18947.989471200137`}, {5., 
       37097.80132316747}, {6., 36470.19846874476}, {7., 37303.73013350228}, {
       8., 34153.22804893852}}]}, 
     {Hue[0.266747752497686, 0.6, 0.6], 
      LineBox[{{1., 33745.33593607086}, {2., 29205.531467683562`}, {3., 
       31733.144189963616`}, {4., 26226.749247495623`}, {5., 
       37998.34945004808}, {6., 34761.95580265083}, {7., 
       36002.368687161696`}, {8., 34861.8725383751}}]}, 
     {Hue[0.5028157299974758, 0.6, 0.6], 
      LineBox[{{1., 2942.164774313387}, {2., 18389.966069079146`}}]}, 
     {Hue[0.7388837074972656, 0.6, 0.6], 
      LineBox[{{1., 27289.836706826714`}, {2., 35557.72242279958}, {3., 
       34429.85789743552}, {4., 31125.995927771935`}, {5., 
       39776.14739347472}, {6., 39747.62120439245}, {7., 40350.54826030075}, {
       8., 30977.50463189563}}]}, 
     {Hue[0.9749516849970554, 0.6, 0.6], 
      LineBox[{{1., 41437.09231292222}, {2., 39416.716767112805`}, {3., 
       31719.427142426684`}, {4., 34919.137741371356`}, {5., 
       27462.74968926866}, {6., 34104.23112947926}, {7., 
       38097.689199342596`}}]}, 
     {Hue[0.21101966249684523`, 0.6, 0.6], 
      LineBox[{{1., 20422.911613172586`}, {2., 24060.989056226932`}, {3., 
       21287.154332978163`}, {4., 31920.776559894806`}, {5., 
       32150.344912146335`}, {6., 32171.350676630176`}, {7., 
       32419.291223285032`}}]}, 
     {Hue[0.44708763999663503`, 0.6, 0.6], 
      LineBox[{{1., 25462.563030963087`}, {2., 25372.45950151544}, {3., 
       12777.160127372972`}, {4., 16811.832839562718`}, {5., 
       24127.088642984785`}, {6., 23474.098004154934`}, {7., 
       23436.644854744492`}, {8., 24352.25790513015}}]}, 
     {Hue[0.6831556174964248, 0.6, 0.6], 
      LineBox[{{1., 35189.96647529787}, {2., 38408.7481451622}, {3., 
       38961.117528290255`}, {4., 38776.950010097265`}, {5., 
       35882.13916133924}, {6., 34605.14656508188}, {7., 34682.18044350007}, {
       8., 24798.971719188525`}}]}, 
     {Hue[0.9192235949962146, 0.6, 0.6], 
      LineBox[{{1., 37843.424875901444`}, {2., 35436.74836761077}, {3., 
       27522.42480438589}, {4., 28712.989839617003`}, {5., 
       40053.26905865047}, {6., 38096.63135199039}, {7., 37342.58176358141}, {
       8., 36028.169083856876`}}]}, 
     {Hue[0.15529157249600445`, 0.6, 0.6], 
      LineBox[{{1., 28483.31899366073}, {2., 26749.762965662405`}, {3., 
       27348.496721271265`}, {4., 26507.928262802776`}, {5., 
       27095.460037452627`}, {6., 25716.462161709875`}, {7., 
       23710.887321647024`}, {8., 19582.914597221363`}}]}, 
     {Hue[0.39135954999579425`, 0.6, 0.6], 
      LineBox[{{1., 52954.14935704933}, {2., 52953.703614910715`}, {3., 
       50429.13769671419}, {4., 50509.53177291684}, {5., 49654.34874032611}, {
       6., 47222.12001736802}, {7., 47556.194357444794`}, {8., 
       44738.63558680517}}]}, 
     {Hue[0.6274275274955841, 0.6, 0.6], 
      LineBox[{{1., 30867.367284601565`}, {2., 30476.045709149024`}, {3., 
       31050.399600077235`}, {4., 27831.06054340199}, {5., 
       31240.356692382265`}, {6., 30871.431085162447`}, {7., 
       31316.012030480146`}, {8., 27327.544547260262`}}]}, 
     {Hue[0.8634955049953739, 0.6, 0.6], 
      LineBox[{{1., 35903.220816690584`}, {2., 34392.41577237142}, {3., 
       34932.04806539753}, {4., 31286.920752346363`}, {5., 
       35128.1110335021}, {6., 34007.00259583102}, {7., 34128.87725469296}, {
       8., 30823.635821752367`}}]}, 
     {Hue[0.09956348249516367, 0.6, 0.6], 
      LineBox[{{1., 30512.553092004884`}, {2., 29315.244135329434`}, {3., 
       29997.86043298283}, {4., 15450.490661581493`}, {5., 
       31212.973882215803`}, {6., 30138.89756031214}, {7., 
       30554.338586793092`}, {8., 28420.03211288235}}]}, 
     {Hue[0.3356314599949535, 0.6, 0.6], 
      LineBox[{{1., 41639.851639132874`}, {2., 41705.0545494814}, {3., 
       42200.58856669888}, {4., 33954.44817666171}, {5., 42466.58504315889}, {
       6., 42610.75670652365}, {7., 43174.62561947286}, {8., 
       41697.062004337575`}}]}, 
     {Hue[0.5716994374947397, 0.6, 0.6], 
      LineBox[{{1., 44178.10406914162}, {2., 41263.69144672793}, {3., 
       36419.66564658715}, {4., 34834.56808687219}, {5., 
       41180.707410884046`}, {6., 40820.090947224766`}, {7., 
       41101.29780830775}, {8., 41707.783589608356`}}]}, 
     {Hue[0.8077674149945295, 0.6, 0.6], 
      LineBox[{{1., 40187.34722418583}, {2., 37435.73364148315}, {3., 
       37811.298638507564`}, {4., 37587.08700354591}, {5., 
       39382.12635488192}, {6., 37180.79527166634}, {7., 50199.77543546679}, {
       8., 57224.244854575365`}}]}, 
     {Hue[0.04383539249432289, 0.6, 0.6], 
      LineBox[{{1., 25511.786902438933`}, {2., 25075.79950528959}, {3., 
       24707.12915043814}, {4., 23155.14483928598}, {5., 25218.58294307281}, {
       6., 24607.7371901352}, {7., 24552.24418546929}, {8., 
       24478.70147668034}}]}, 
     {Hue[0.27990336999410914`, 0.6, 0.6], 
      LineBox[{{1., 39254.683351091415`}, {2., 39864.18173882596}, {3., 
       39057.50337748271}, {4., 40177.13614975872}, {5., 38423.04791309141}, {
       6., 38375.78513650663}, {7., 38454.78074471911}}]}, 
     {Hue[0.5159713474939025, 0.6, 0.6], 
      LineBox[{{1., 29774.89785869386}, {2., 29688.70430617063}, {3., 
       29459.244323025938`}, {4., 26359.296187455227`}, {5., 
       29654.323053285803`}, {6., 30100.243484831844`}, {7., 
       28232.651807209906`}, {8., 15871.454503417151`}}]}, 
     {Hue[0.7520393249936888, 0.6, 0.6], 
      LineBox[{{1., 45509.706768410615`}, {2., 43035.36749526637}, {3., 
       43715.50691348488}, {4., 43245.14939895048}, {5., 45259.79160684283}, {
       6., 43276.85385573833}, {7., 44461.273711820715`}, {8., 
       43781.794730502705`}}]}, 
     {Hue[0.9881073024934821, 0.6, 0.6], 
      LineBox[{{1., 31052.648494006276`}, {2., 33435.77868124345}, {3., 
       31639.470640670188`}, {4., 18599.84654721128}, {5., 
       33419.37040477958}, {6., 31415.939044464016`}, {7., 
       30378.934402650684`}, {8., 29635.677255322567`}}]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->True,
    AxesOrigin->{0, Automatic},
    ImageSize->{309.166666666667, Automatic},
    PlotRange->Automatic,
    PlotRangeClipping->True]}], "}"}]], "Output",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{
  3.510911400984375*^9, 3.5109119614375*^9, 3.510912012640625*^9, 
   3.5109120485625*^9, {3.510912693140625*^9, 3.510912701828125*^9}, {
   3.5109127328125*^9, 3.510912775515625*^9}, {3.51091307984375*^9, 
   3.510913122734375*^9}, 3.51091315546875*^9, {3.5109133021875*^9, 
   3.510913311390625*^9}, 3.510913756796875*^9}]
}, Closed]],

Cell[BoxData[
 RowBox[{
  RowBox[{"fdata", "//", "MatrixForm"}], ";"}]], "Input",
 CellChangeTimes->{{3.510911705265625*^9, 3.51091170921875*^9}, 
   3.51091186465625*^9, 3.510912063671875*^9, {3.510913034765625*^9, 
   3.510913050640625*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
\:7c7b\:6982\:7387\:5bc6\:5ea6
\
\>", "Section",
 CellChangeTimes->{{3.50442793515625*^9, 3.5044279475625*^9}, {
  3.5109116683125*^9, 3.51091167084375*^9}}],

Cell[BoxData[{
 RowBox[{"d1", "=", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"StandardDeviation", "[", 
     RowBox[{"Flatten", "[", 
      RowBox[{"fdata", "[", 
       RowBox[{"[", 
        RowBox[{"All", ",", "All", ",", "i"}], "]"}], "]"}], "]"}], "]"}], 
    ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "3"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Mdistance", "[", 
    RowBox[{"u_", ",", "v_"}], "]"}], ":=", 
   SqrtBox[
    RowBox[{
     UnderoverscriptBox[
      RowBox[{"\[Sum]", " "}], 
      RowBox[{"i", "=", "1"}], 
      RowBox[{"Length", "[", "u", "]"}]], 
     SuperscriptBox[
      RowBox[{"(", 
       FractionBox[
        RowBox[{
         RowBox[{"u", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "-", 
         RowBox[{"v", "[", 
          RowBox[{"[", "i", "]"}], "]"}]}], 
        RowBox[{"d1", "[", 
         RowBox[{"[", "i", "]"}], "]"}]], ")"}], "2"]}]]}], 
  ";"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.503635007546875*^9, 3.503635040671875*^9}, {
   3.503635168203125*^9, 3.50363520165625*^9}, {3.5036353679375*^9, 
   3.50363538184375*^9}, {3.503635552890625*^9, 3.503635702890625*^9}, 
   3.50363588159375*^9, {3.503636148375*^9, 3.503636180578125*^9}, {
   3.5036380400625*^9, 3.503638175078125*^9}, {3.503638274875*^9, 
   3.50363841396875*^9}, 3.50363844571875*^9, {3.503638484421875*^9, 
   3.503638569453125*^9}, {3.50363860275*^9, 3.5036386049375*^9}, 
   3.503703664875*^9, {3.50370375134375*^9, 3.50370375234375*^9}, {
   3.503703864*^9, 3.503703991828125*^9}, {3.503704053359375*^9, 
   3.50370407403125*^9}, {3.503704119078125*^9, 3.503704183546875*^9}, {
   3.503704229*^9, 3.503704257734375*^9}, {3.503704310046875*^9, 
   3.503704369140625*^9}, {3.50370441159375*^9, 3.503704414640625*^9}, {
   3.5037045960625*^9, 3.50370471846875*^9}, {3.5037048270625*^9, 
   3.503704843359375*^9}, {3.503738413265625*^9, 3.503738457265625*^9}, {
   3.503738501171875*^9, 3.50373854034375*^9}, {3.503738654296875*^9, 
   3.50373868271875*^9}, {3.5037387613125*^9, 3.503738789078125*^9}, {
   3.503739371859375*^9, 3.503739372078125*^9}, {3.50373967565625*^9, 
   3.50373967846875*^9}, {3.50373974390625*^9, 3.50373976078125*^9}, 
   3.50374180078125*^9, {3.503790317671875*^9, 3.503790472484375*^9}, {
   3.5037905061875*^9, 3.50379056340625*^9}, {3.503790598890625*^9, 
   3.503790625734375*^9}, {3.50379071359375*^9, 3.5037907541875*^9}, {
   3.503790815890625*^9, 3.5037908220625*^9}, {3.503791022140625*^9, 
   3.503791033078125*^9}, {3.51091491334375*^9, 3.5109149181875*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"ddiff", "=", 
   RowBox[{"Flatten", "[", 
    RowBox[{
     RowBox[{"Reap", "[", 
      RowBox[{"For", "[", 
       RowBox[{
        RowBox[{"i", "=", "1"}], ",", 
        RowBox[{"i", "\[LessEqual]", "15"}], ",", 
        RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
        RowBox[{"For", "[", 
         RowBox[{
          RowBox[{"j", "=", 
           RowBox[{"i", "+", "1"}]}], ",", 
          RowBox[{"j", "\[LessEqual]", 
           RowBox[{"i", "+", "3"}]}], ",", 
          RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 
          RowBox[{"Sow", "[", 
           RowBox[{"Flatten", "[", 
            RowBox[{"Outer", "[", 
             RowBox[{"EuclideanDistance", ",", 
              RowBox[{"fdata", "[", 
               RowBox[{"[", "i", "]"}], "]"}], ",", 
              RowBox[{"fdata", "[", 
               RowBox[{"[", "j", "]"}], "]"}], ",", "1"}], "]"}], "]"}], 
           "]"}]}], "\[IndentingNewLine]", "]"}]}], "]"}], 
      "\[IndentingNewLine]", "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "1"}], "]"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dsame", "=", 
   RowBox[{
    RowBox[{"Reap", "[", 
     RowBox[{"For", "[", 
      RowBox[{
       RowBox[{"i", "=", "1"}], ",", 
       RowBox[{"i", "\[LessEqual]", "15"}], ",", 
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
       RowBox[{"For", "[", 
        RowBox[{
         RowBox[{"j", "=", "1"}], ",", 
         RowBox[{"j", "\[LessEqual]", 
          RowBox[{
           RowBox[{"Length", "[", 
            RowBox[{"fdata", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "]"}], "-", "1"}]}], ",", 
         RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 
         RowBox[{"For", "[", 
          RowBox[{
           RowBox[{"k", "=", 
            RowBox[{"j", "+", "1"}]}], ",", 
           RowBox[{"k", "<=", 
            RowBox[{"Length", "[", 
             RowBox[{"fdata", "[", 
              RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", 
           RowBox[{"k", "++"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"Sow", "[", 
             RowBox[{"EuclideanDistance", "[", 
              RowBox[{
               RowBox[{
                RowBox[{"fdata", "[", 
                 RowBox[{"[", "i", "]"}], "]"}], "[", 
                RowBox[{"[", "j", "]"}], "]"}], ",", 
               RowBox[{
                RowBox[{"fdata", "[", 
                 RowBox[{"[", "i", "]"}], "]"}], "[", 
                RowBox[{"[", "k", "]"}], "]"}]}], "]"}], "]"}], ";"}]}], 
          "\[IndentingNewLine]", 
          RowBox[{"(*", 
           RowBox[{
            RowBox[{"Sow", "[", 
             RowBox[{"-", 
              RowBox[{"Mdistance", "[", 
               RowBox[{
                RowBox[{
                 RowBox[{"fdata", "[", 
                  RowBox[{"[", "i", "]"}], "]"}], "[", 
                 RowBox[{"[", "j", "]"}], "]"}], ",", 
                RowBox[{
                 RowBox[{"fdata", "[", 
                  RowBox[{"[", "i", "]"}], "]"}], "[", 
                 RowBox[{"[", "k", "]"}], "]"}]}], "]"}]}], "]"}], ";"}], 
           "*)"}], "\[IndentingNewLine]", "]"}]}], "]"}]}], "]"}], 
     "\[IndentingNewLine]", "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Pd", "=", 
   RowBox[{
    RowBox[{"Length", "[", "ddiff", "]"}], "/", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"Length", "[", "dsame", "]"}], "+", 
      RowBox[{"Length", "[", "ddiff", "]"}]}], ")"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Ps", "=", 
   RowBox[{
    RowBox[{"Length", "[", "dsame", "]"}], "/", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"Length", "[", "dsame", "]"}], "+", 
      RowBox[{"Length", "[", "ddiff", "]"}]}], ")"}]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.503635007546875*^9, 3.503635040671875*^9}, {
   3.503635168203125*^9, 3.50363520165625*^9}, {3.5036353679375*^9, 
   3.50363538184375*^9}, {3.503635552890625*^9, 3.503635702890625*^9}, 
   3.50363588159375*^9, {3.503636148375*^9, 3.503636180578125*^9}, {
   3.5036380400625*^9, 3.503638175078125*^9}, {3.503638274875*^9, 
   3.50363841396875*^9}, 3.50363844571875*^9, {3.503638484421875*^9, 
   3.503638569453125*^9}, {3.50363860275*^9, 3.5036386049375*^9}, 
   3.503703664875*^9, {3.50370375134375*^9, 3.50370375234375*^9}, {
   3.503703864*^9, 3.503703991828125*^9}, {3.503704053359375*^9, 
   3.50370407403125*^9}, {3.503704119078125*^9, 3.503704183546875*^9}, {
   3.503704229*^9, 3.503704257734375*^9}, {3.503704310046875*^9, 
   3.503704369140625*^9}, {3.50370441159375*^9, 3.503704414640625*^9}, {
   3.5037045960625*^9, 3.50370471846875*^9}, {3.5037048270625*^9, 
   3.503704843359375*^9}, {3.503738413265625*^9, 3.503738419703125*^9}, {
   3.50374191665625*^9, 3.503741930703125*^9}, {3.503742183359375*^9, 
   3.503742272984375*^9}, {3.503742305171875*^9, 3.503742403046875*^9}, {
   3.503742440515625*^9, 3.50374244575*^9}, {3.50374353828125*^9, 
   3.50374356528125*^9}, {3.50374359559375*^9, 3.5037436225*^9}, {
   3.50374369775*^9, 3.50374380421875*^9}, 3.503790578140625*^9, {
   3.50379104465625*^9, 3.50379104871875*^9}, 3.50380677778125*^9, {
   3.503812251625*^9, 3.50381228009375*^9}, {3.503822011203125*^9, 
   3.503822015546875*^9}, {3.50382227584375*^9, 3.503822306234375*^9}, {
   3.504220805484375*^9, 3.5042208076875*^9}, 3.504221349*^9, {
   3.504221483859375*^9, 3.5042214840625*^9}, {3.504427843828125*^9, 
   3.504427844046875*^9}, {3.50442795365625*^9, 3.50442795971875*^9}, 
   3.50442803121875*^9, {3.5044786089375*^9, 3.504478633078125*^9}, {
   3.510914930984375*^9, 3.5109149333125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"mdsame", "=", 
  RowBox[{"Mean", "[", "dsame", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"mddiff", "=", 
  RowBox[{"Mean", "[", "ddiff", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"ddsame", "=", 
  RowBox[{"StandardDeviation", "[", "dsame", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"dddiff", "=", 
  RowBox[{"StandardDeviation", "[", "ddiff", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Ns", "=", 
  RowBox[{"Length", "[", "dsame", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Nd", "=", 
  RowBox[{"Length", "[", "ddiff", "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", "ddiff", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Max", "[", "dsame", "]"}]}], "Input",
 CellChangeTimes->{{3.503635007546875*^9, 3.503635040671875*^9}, {
   3.503635168203125*^9, 3.50363520165625*^9}, {3.5036353679375*^9, 
   3.50363538184375*^9}, {3.503635552890625*^9, 3.503635702890625*^9}, 
   3.50363588159375*^9, {3.503636148375*^9, 3.503636180578125*^9}, {
   3.5036380400625*^9, 3.503638175078125*^9}, {3.503638274875*^9, 
   3.50363841396875*^9}, 3.50363844571875*^9, {3.503638484421875*^9, 
   3.503638569453125*^9}, {3.50363860275*^9, 3.5036386049375*^9}, 
   3.503703664875*^9, {3.50370375134375*^9, 3.50370375234375*^9}, {
   3.503703864*^9, 3.503703991828125*^9}, {3.503704053359375*^9, 
   3.50370407403125*^9}, {3.503704119078125*^9, 3.503704183546875*^9}, {
   3.503704229*^9, 3.503704257734375*^9}, {3.503704310046875*^9, 
   3.503704369140625*^9}, {3.50370441159375*^9, 3.503704414640625*^9}, {
   3.5037045960625*^9, 3.50370471846875*^9}, {3.5037048270625*^9, 
   3.503704843359375*^9}, {3.503704873734375*^9, 3.503704882015625*^9}, {
   3.50370492175*^9, 3.5037049518125*^9}, {3.503705422515625*^9, 
   3.5037054355*^9}, {3.503742053390625*^9, 3.503742064125*^9}, {
   3.503742673890625*^9, 3.503742703484375*^9}, {3.50382212615625*^9, 
   3.503822154328125*^9}, {3.503822518375*^9, 3.5038225686875*^9}, {
   3.5042536209375*^9, 3.504253626765625*^9}}],

Cell[BoxData["5.431348673226883`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["20.21236425096262`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["5.873177408546937`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["13.491535459566846`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["307"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["1922"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["55.048448277221446`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}],

Cell[BoxData["26.811948319666794`"], "Output",
 CellChangeTimes->{
  3.503742806609375*^9, 3.503743568546875*^9, 3.50374362715625*^9, 
   3.5037438071875*^9, 3.503787595171875*^9, 3.503789216296875*^9, 
   3.503806792390625*^9, 3.50381229053125*^9, 3.503822049875*^9, {
   3.503822128921875*^9, 3.503822157484375*^9}, 3.5038223110625*^9, {
   3.503822522640625*^9, 3.50382256921875*^9}, 3.50422033921875*^9, 
   3.504220813453125*^9, 3.50422135290625*^9, 3.50422148640625*^9, 
   3.504253653140625*^9, 3.504412913375*^9, 3.504427848234375*^9, 
   3.504428033921875*^9, 3.504478602640625*^9, 3.504478640203125*^9, 
   3.50451299965625*^9, 3.504513497984375*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Ppdf1", "=", 
   RowBox[{
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"500", "*", 
        RowBox[{"PDF", "[", 
         RowBox[{
          RowBox[{"NormalDistribution", "[", 
           RowBox[{"mdsame", ",", 
            RowBox[{"ddsame", "-", "7"}]}], "]"}], ",", "x"}], "]"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"x", ",", 
         RowBox[{"-", "25"}], ",", "80"}], "}"}]}], "]"}], 
     "\[IndentingNewLine]", "Ppdf2"}], "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"4000", "*", 
       RowBox[{"PDF", "[", 
        RowBox[{
         RowBox[{"NormalDistribution", "[", 
          RowBox[{"mddiff", ",", "dddiff"}], "]"}], ",", "x"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "25"}], ",", "80"}], "}"}]}], "]"}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.503742692953125*^9, 3.503742746390625*^9}, {
   3.50374294925*^9, 3.503742996890625*^9}, 3.503743030125*^9, {
   3.503743255015625*^9, 3.503743324890625*^9}, {3.503743377015625*^9, 
   3.503743387203125*^9}, {3.503743458265625*^9, 3.503743496796875*^9}, {
   3.50374385328125*^9, 3.503743871109375*^9}, {3.503743903890625*^9, 
   3.503743905640625*^9}, {3.5037439395*^9, 3.50374394934375*^9}, 
   3.503806943640625*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVjWk81AsbhoeicihZj7KP7YyJ2Wey9PwjSr1SSZZkS4XqWCIqFUq2snco
+7HX0CJkKU+i0yCyJISyVHIIvaWyvr0f7t/16bpuNTfvfUeESSTSk1/7P4su
ivcvL/NQrVrMW1DoCIYiBw8/+c5Dvder1sQcOQSt0cXjYVM8HIg9o/lV2wm+
Xjf/KfKWh+QuURvdGmcAfoic+GMe7u7YvY4S5wod9LaMF+U8lI6msQ2E3cC9
UkkzroSH36wEITJBbhBdX82UyuCh+paBPo8Th6G75+ue34N5yDT66nDyzBHw
dDLt6T3Fw+TddurFK4/CwkiCc9pxHppwTGYNko6C+pTen8oHeVhRMPiqpPoY
nBTxjNEw4OFSHTlDmO0FpJhKqQ90HkoFHzBTHvCCREnRm4V/8LAxTTDIijoO
DzfmFlEUeLiu3flGyeQJWMkYaKT94OLL6Wgbt3FvSKnUtfwyxcXLk+7Npxx8
gGJ8tqvsIxenDbXaZep9YM8O+RHOay7mXJbaUZjqC2lOe0nGFVxM6PfjJ7if
Ar3RrIilEi4aemb5WwyeAvT8vBbzuTihGbe93cEfPvjHKJle56K6V69LnGMA
MGIaDSz8uXhryzuZmMuB0CgpUy924lfPo7z7ilwQ2P3lZtFy+Nffx9iY17eD
4ELOsq2VNRdlGyeS8d0ZaKrcHGDD4GJlvV9yfUAwHDKOXJCjcPHwFv6iv8Z5
mK7vvtSjxsXMwEZn+dfnQa71VOLB9VzcavGpLWTHRXAdLbnjOs3BHwsrzbT1
Q8F/w8V7vh856JXL77PODoXIPXvKQgc5GC6l9s1QJgxKa79U5LRwUP7m2vTz
Ky/BXDL38VARB/3Kw1YkrA4HiebVOJPFQR+j3yZdE8JBVajviVAKBx8vPS/3
V7oC208GN6qFc/BpWEhuMURAstmTFldXDu4VkKY9S6Og8Fxiq68dB81bqhxd
rKOh+t7hl6FWHFyRc3aJvRANQ0qiXTnGHIxS5sq8sr8KerM73wwpcNBDYajK
ZnscbKUqDsxIclDLNF3ujWg87HebHBRazcGio3l1B07Ew7nWuGG1WTam1pek
uG1JgOcFXZ9cO9i4FHEjcDMpCd705//rK2DjeVObQlpgEnyWCpwMRTZ+kyOr
DU4ngexFhZmcUjZWKg6a/TWRDG62Tj+Gotk45XWFRF6VAgHX9OdmQtm4PDpt
63c9BSKfkhaEzrDxxmPW2H+1UqFUP3dZ7RgbKVM13HbrGzC/akzUzZSN3bOs
7MHuNFi7pWq1nwEbF8hVlYUh6aDuHy0WRmeja8t1S4ZeBux4R137twobW/PT
3/QmZ0LyQ1/Z4XkWljULaqwF2aDnOU92e8BCreKguKv0PPiQOtSwhs/CgE0u
y8dy8iDz+T9H7uWykL/1pV+IdD6s1UkuJCWxkKP4Y0PiUj58/kDVzfJloenU
hYYjM4VQICfdYu7JQvUHSeE2/kXgZP7zxGcXFmaSbJX6fhZBa35jqfEeFsaO
BEu0i9+CO+5OjH49FpKzD401WfPBI3lb5yUtFu4001con+CDagPFX1eZhbdu
SwSkRJZAPPl7+VkJFhbtLxY+KygFn+G4zQoTTNzVKxOf9vAu0FyeEAeKmSgj
ZF+be78MxuIKhxazmdjKe+9J3/AAsuuuheWnMvGfezLq9y89AEkVh4avEUx8
bMF3KXUsh5mBL9uTjjLxYkRV/mXtSrgl0Ttm4MREef2VR9KzKsHNuC5q2IaJ
w+1jtZMKD6EjPaaZbsbEVzNfR9xkq+D+QQ2rl2QmRjfE6Rfo1IBXjNh04EYm
dlZIT6WW1YB6zXS8ijQTC9qkNshsrYXEDY86/hRm4tztKxUvDj8Cv16bAxJD
DDTfaUQOFtQB0zbi0M5MBnb7qcj3xtVDn1Thh41/MTC7zEfEebweQlqfeU9e
Y2DUi4jTAeZPocVMNCz+PAPXd8fCiRUN4M4KL+h2ZOCQZ4MZLaERxKbz9Iv2
MzDGUyRz7Ecj3L3d8PDMfxjoIhXMdnd7BgvqK5sVjRi42pm8VGfwDySvvzTl
tpGBIh23wpuEBGDw4u8gljQDN4l97HEMEsC7yHoh0d8YaNa4ftv4tACoJGGZ
4jk6zmmEjkqPNUHj5xDeVC8dpW8klAZMtcBs84XQc6l0vBDZr8J/8BLSIzLF
LOPp+CXVsDtLqB1MTB8nKUfSMS1zp2G7VTvEVi/mPwmk46FMTtnSVDtoFwc3
rbKlY9uAmI8w0Qmt7unWvbvpmNg0csg1pRP8VWv7b5nT8doah2D16U7AlPnP
lhw69verBw3md4HdlbPSybJ01G8rOfFMvRuWtt5MPyJBxxDSyai68G7IW6zS
5IrQMeX7n8Em490w7f+T2/eVhr3ytiVzla8h8nCQo2oXDU84U5KeH+2FKuJ0
Pj+RhuQ7ru1FcgPwjv97cUsUDcO0TiskZA2AqEINfyKEhr6GPfvuUwZh38xy
GdWbhpOUl/6Pt7+FiZyoev4uGh67LNI+0foOpNZSn7WY0DChUTr2vuIQbD7b
KpjY/Mu/PZry4PgQXNkn3U7VoeHt8iuMCxLDoLoi4y1/JQ2/ea8QzXQZgWuD
F57d+K6Pt/f1Hat9OAJ9FU9f9L7Xx3N1e603S43CqWOW/fb1+qhOPp3hIhiF
gucuP+3P6eMtEa8fIzs+gHhMBNNhUg/dmTOsV/GfwP5wi8HNN3oo77Vl2yqh
cSgwXG/SJ9DD924bE0f8xgEmbu5xKNDDFeP+5DsH/wU/y9KTDs56uOqAT7Wa
yST0rHtV6NC+CXVnrNojyqZBc0zhzs26TUjLu35Xd24a/NCpoq9kE9YJ+TLa
ts7Ab75jDQ7Rm9BWzdROtWsGtnTMDzmYbkK+jx/fQOS/kJ+srniwnIqm61fE
9qR9AyOXBNemPCo6/Hv86sfJb9ChSyrcnExFsqf1/UViFkhPB+i/n6JivKKB
vcX4LDjMpG5/RaOimSJnMNfiB6zdve6UFV8X+aY699KM5yFP4cLDx2m62NH/
pHVnzjwYvp9Y3BSji5mi0qV/iC6AR3BTpLiXLnbqhSuFdi5A/a3wTIG2Ljb+
Zb76XfASnF61IDDNpaCkYN72gKgQId7pta4skYLftZrvWZgIEbmZvfvVwyj4
xFdm7fgFIeIlu/ItyZWCP4m3mtw5IYLi7vftkTIF872Xt+r8FCbe4pgq7+Yf
6JRbX52gIELsOPsqkJqgg192n8xqm1xDvC2wuM+7qINDgv40cQsx4nTno4lt
J3Xwu3r/BfN8MSKPWuB6yEIHxWMlPCpdfiOE3p7eFSukg68xw7F6RJyoNv1d
ZdpXG6m7HtW9lJAk9vpctV9w1salrO6oB6aSxFg6KXn1bm3U+CNJlnxWkpCf
HVutRtFGG6vqPbljkoR/UdWXvcNa2OJNF9nWsp7YJHHwWdk+LWy/PGOUUSpN
NGxuIyGhhfbHlVUvTkoTjkdNDVv0tFBuj9jeWaoMEV2ne3dUTAvv2oxPFJTI
EB98F27IPtXEJoO8YtUKWSK7O+NkIFMTK6Ickz6NyBNS2e9kDGU0UHWxoR/L
FYnw0X9U0oQ1MOWx75tSUSXih84dyvw0GVXIRvk8OyXi7b3zRM0LMp66+Gqj
6qISwX+64YRhBBkrgiZYW3erEGYf9z81nFPHsnVezp9E1YggPYGv0Ts13MU+
31pF0iD+9bsbnN6qhrPzT1nDDA3CqTIlYqFWDa9+aVY4cESDMCOOZtTeUENT
zptjKs0ahNS+FQIjazUUn7Qtod3UJG4HGKsaP1NFxbAIyzXm2kTtmcMZ5+xU
0Ec6WKKrnUJwPoXr3+SqYNa2lLbG1brEXbuiJw/lVHDJzfLOJOgSedzJ99+6
lDGGVvR8oFSXiPl2Ws9nrzLqFv/5gRZHJRx8o+vcdyohg+gha9vrET887g1Z
Gm1E0pzn5kVROsGyW9ZUVZXHFMVHmkFjLOJOFPXvoAU5FLb6NMEXYxOUGnvl
9h45/NI6bDJKZROqyg/kwhLksM3ZeNbWl01IjHqsGhWWQyo5oYqYYxMuDc8W
4z1kccEz0lsulkP8DyZk1vQ=
     "]], LineBox[CompressedData["
1:eJwVV3c81m8XLjLKFpmVlZVsHuP5fu/jWR57/pBQIaOszIoiCSErIqSSkYaV
rBKREVLISgMJKVtRxNv7z33+uM/nXOe6Pufc59zizr6WJxi2bdvW9O/4vzU7
eqdU34sfNjxjffckakKT2mlePWtRuDLYEsnEqgyPLOpiPEJEYezT99ZXb5Ug
05fxb1KWKEQS539UpyiB74P0qU+josBWTHx2gE8JRCXrnoV574XbR6t5nUQU
IYSX0b0meh+wmKl/+aGmANfPdHzMcBAD9dMe+3VTZSGBxTfzoI8YrG7W1hrY
y0Lk9d1WDeFi0DdAjM6RkAXvSof2yTwx0BYxjuSulAHKwlyFxjcxCBW3+4W9
l4ZF992xfUHiILldLnuH+gEwtnVQ5UqSgBO0vgy7/RKwtjRQEnBLApSKDKdr
l8UhP9Hi4FCpBLgWzRg6tYvDRgtN6s5bCeiXWsrx8xeHh+oqe9R4JSHWdNK9
/pUYsPEy/7FJlwTW4VuxDLv2Q9WjiOCnBZJwW01EWP3pPnA2WF/aXyUJMfE7
R3947YO6iIXv0wOSIM0m1r/csxdOzr//eE5QChLTv5H/yxOFjq7SF7nZUnBz
7jSbkYMwBHvI44wPpcBgQtzqC78wSOwoqHN/JgV7um9kbXsrBOd0sx4rf5QC
x5kRzVdUIZC7H1XQtO8ASD0Z8o8nCEJszOErk3cOQFdxiVSq2h7QJzFaKN6T
huFAeap4PC8shZ0Z+lkrDX3Ogp/FzXkht3r2aH2nNHQ3yr0t4+eFFYUhH+N5
adia55MPyeOBPIFHCSc1ZeDQx5ST15q4YeOHTXvhSxmgceYUj2txQpFMl5nP
gAxsauckc7zjAEtnvUGNaRlQWh1lRX4cUDx4cPIlmyzESwlXlT5gB5umbTu+
WMqC/QHuxzcV2aA84z7aPyYLyXEuFpYurODQu79tckkWjgwKxipysgIrR7pp
yQ45MDt+OXCtlgWcIsMdMVk5uFW88ceUjwXYva1Dj/jKgZZ5jPVwHxO4kTar
Mv7KQZzDiZmVMEbgOR+AH+WSB2py9Oy0BiM8q55ukRaX/2e1AsrmGWD3ob53
TyjyIFrR5vH4BAM0Ctxb6ouXh4SvwY/sj2wHkVkLRW7hgzDzwDfp7OAmClO/
GXJP/iBs5xZi3XlyE30KnW4E3YOQRnUyHvn7F+XtCrc67XAQhvkycjG5v0hW
9uGZ3tyDYK3jFV2auI7UXZib0yQVINNh+sJmyhq6ft+C/ZC6AkS85/oRTlhD
q4s5/7VQFGBf/rMw4U+rqC5CbfrnCQUIN9T7kqy4iiD3GIftPQUo3zFOIn74
iUyG62yFDh2CTtgMOe6xjErEmO+UY4cgWGV1yGDfMuL2sJgxMD0ERgm/ZiX7
l9C7X1Nh53wPgbijSu1d6hKy5+PPGyk/BDPsvySSVRaRm5nvj5uaisB2M4FT
1W0OtV+v09DUVwQrnQhfjrlZJPeJKbzbVhHSzfPxSyGz6IdXDs/WGcV/+iW8
VUj6gfzjXmkee6oIcuSYya23Myi8RfLiv26DUy7n+TezptDoA8/+vZZKQDRV
DIxWnUKQWion5KoEl95l3MvrnEQMR3V7uWKVYPPBw9eRDJMoes1S8u8bJfjI
IP3xcOQEmvqUGbI2pgSeKR4hawcmEL3lU+fyshKMdO47saPzC2Iy0ND5yaYM
cTObdRZCX1Ab/4vx70rKMBKsz05uHUNrrBMJ37SU4ZtOWFVX4BiS3WAmTOkp
w5l5r/pbUmPoyrhx/LiVMrhfuV/EHTuKjEqH1IZDlGEtdFDc7Okn9Ia+ENXa
oAy+ZL8PShHv0TbibqWX7cqg4zjJmcTwHikraQ6/6FGGiGpGk20xwyiZP+xQ
/Rdl0HZ5dmY9fQhZjrMMPGZRAePy9KK4zgEU2S8fUc6tAnyKX1pLHQfQ43YT
+VIhFZjhucxQstiP+EqvXbh/UAXGTZiahff3o4HQ/TJ3zFRAtW+v2kZiH2L2
JfXk2qnAr4ays8pKfYjgfCI057gKBN8Zv7+zpxdl0h+8yQhQga8l9rypQr3I
np9wJjFDBapPWnVY1L9Fn0pMX4V+VgHGkEvTf9K6kNgerXizaRUgZZP+CrF0
IZfz4iaSiyrQGxnh9CS0E00brbztYFAF0lSNo45XB1qavjEkJK0K3+3bKEGe
7Ujd/FLWrKIqbM3xfvCea0Mh1V4OLwiqkDT1KzAzqA1tXEajHgaqIHI6qexY
XCtikvw6Ve2lCjts9tzq7nqJ6HHdxfFBqkA8Vd/u7vwSxS1Wnzp6QRXCjnL2
z/9uRpyNcfPMyapw8HYGxyPFZiToqLz632NVUEMrO5lKXiCFjFDmld+qoJRV
LJ+0Xo98Nl3b2xjU4GyyfHW+Yz0qP2Eal82mBkFe0SMVTc+Qpro4J3mvGug6
/sSj058i6GnlTwU1+OJxOLvMoRZFapUNnjBQg9Ra3k7l/hrUcuvGDW1LNVj8
udJEN69Bhj5ee8dc1GDFn/kjr2k1smbjPaAcowZmYgmJH9yeoOv+65OMyWrw
TsO+aHKpEg0PT9wbzFSDAaXdtqoXK5HTvWqF8PtqwDVZYOuW/xh5UB3Vu1+r
QZuMvbryjgoUGn6P7MWnDo3XX8eEkUqQ4GyY2z1RdcjtMOmQKXiEquwtrkxI
qUNUAGdi665HaEnjT7eDhjrc3uaR8eDTA+Txw8jexEYdfLVectQWFSNme7Hz
V5zUwZOv1DFfrBjdbVu51eKmDg7AsiCecw99yrv5FQv5F+9dV05hVhGyPjzv
p5ipDjnHOHvzKgvQUmvztZO31SHRmrn6OxSgJPXMqsJ76sAzUFXp9yYfdXDp
beyrVYdrk5I/mZfvIr3W1Biu9+rwqtLil7VVHlJU08xdENGAxaDd/30fzUVd
t3e9UJDSgCM/fioRtXKRJ+fnLx4KGpDdXfJ5MvUmyv8WIzdG1IA3jlnFbJY5
SPj2cGWPowbw+0bozv28gWo4SgY53DQgTZRMdne7gf4Ljfxj4KMBWqXZZi+H
M1GyzUFouqABh05XMK20ZyAWjvOdFbc04CLzjF5tWzrKP2cxN1ekAeWhefKj
JumINH2A52CZBmCHEiYuDaShC83dNncbNaCX+kKZd/4aWjkrNn5tTANipZcY
WImpaHSyeS1QUhNyHgaTukIS0d+7/HecFTThRtDjyrd1V5HwcXcDcw1N4Mjx
XtrPcBX9N7Ir66C+JiS9kWAi34xHHW8sdMdPasKuKIVdKoxX0FTC3S9vAjRh
cmi72j63WLTD8Gd8fZgm2KKqmOKuGIReZn7I/LeXGbJrcRrnR6PKms/nzSo0
QcJ1na00NAr1BKlIY081gfZ5wfjs70toTvVSt/xLTUg8vH+76blLSO6R9H7m
AU3wnzK/3hcViXLveDc++60JuXVfEuKfRqBnTg0e9xkIcCS+Q+CLWQQaFuHh
yWQjgPiByQOJr8MR3/XK4wF7CbDuyWDxi3ABXYlbZ5DXI8B1e44aaWooKtQ3
eSBgSIChE0a1GdfOoZc7blkxWRFA4ViekdHkWbR5gZQ/6koAV7NiDqHMMygw
4Ao1I5YAP61NvzfJB6MU5ZHZqBQCHJufr63JDEIlswrX/bMIoPziqLfuriD0
zf3tpMlDAjA1OzimrwYgJweB2B1vCWBUHcUW+Ps0ChXyVF4aIgBpr15c4cXT
KHOgbujzGAHOP5d362I/jfrMneSeLhP+vf9i3x8e9EN0akHHaQEtGIxOmxnd
7Y1OMKz6HxXTgnYf3uV3Zl4osoEuYiKnBbcCJhgfJZ9C9do/TsnqasEVMfEn
aWInkaqiGsdnJy3I0vR10Ah2R/cXffdouGtB/5J9ZeWoG5J88nB/vK8WHIX1
8KemboiPKK1KiNCCPGmNWi6NE+ingZBt0h0t4Dz3hvRU1gX5cNgc+1qsBVvH
LnceeeSMJt+meupWaAFHlMvNOXVnNGDLHjbVpAWTj0MfFBkfRzUntm6jCS1Y
mK1LomofRcpyxPvpP7QgvFG6QdTHCRX/OPP4+4oWzHC9dPlQ5IiyApZaMpi0
wfSzNX5XzgGFXfw6My+tDV2BWx+tXA6jFYrEClVJGzwd7vz0eWaHvFmP/s0m
aMPA318MuUJ2yClpiItO1waG987aQ59tELrZqX7b81+8Nk1R3RvWqOYYK/7r
tDb4ToQd8OO2RspSVH3jc9rAd8oxgjneCok9eH54LU4b6IUu7cxxloihtvyC
+UNtcDyULKn7yBydC5uLKazUhmqvX8yOmDlaRgdTNp5pA8/Cqy9pt83QRGv+
3XuvtYGWsSh1ZcMEtb7LaN82rw3m2vXzk4uGCM9812Ozqg1nZ1tK7HQNUfUR
npGHW9rwkKVvwe2KAbo3Hjdrx60Dtr3Xs6ZV6ejKwnnechUdyGMsyUyuoSKG
yjoRFh0dYJ++9HVRkorOhaxKOZJ04Krvs8p91yjo5KYfYaeVDqhqc6HzYWRk
zO7qcDxQBzyH86U+nNFDA2T381fDdMD6t9uXcwx66HjoydzaKB2wq3TPFEwC
FDzjN8qT/s9ft0yMyxmhW+3nXZue6IBu4ZmE1INEJL/t4uW5eh3Ix6eDJ07q
okpCVKFwqw5IF7pVSZbqoPbCuGn/AR3Y4FHTWqBqo6WoDC/JVR2Q4rr4PaVY
E4U9y7pqtvWPT48MozCHJmJZuVkSyqILymc1Zh8GaiBRl/yFPgFduFVQtD3R
TB1R9coDo7R04a3RLc4bKqro7ZnK9DLQBddBDpM3FSrIvqy66gNdF7pVXmZZ
E1SQz/7na+qHdSFgyfjmmoEyyvzbEfb1rC4Y2rlNzUofQhIa3Td5InWB0Poj
5uthBfTIq+c5FqcL5lW9zympB1HTyOC261m6wJ7IfL2UVx59r52Ioj3VBc5P
LP3ZpjIoeHGqwL9ZF6Y7rViUiqXRNrnvrbmdujDR35wvxyqN+DIXWVdHdKFm
R7z8l14phAdvJhRt6EJUoEyIb6YEan+0vaRvBxEGWjXZ9XZLIKuvO95ssROB
1fS5blGKOPKwZuOx20uEvLPbX/ZliqFUVcF0VpwIPO2izedy9iLRkyJV6jQi
RHpubF5oFUVFd/YNHjMlAv9tHgPLXyLoGfcBoVonIiD+o2FdbsLo65zKTc9w
IogtdNRxxwighaAKsn4sEXISTWNVXu9BfzZUZ6RSiKDD3ZA7KLgHcbKpE0bz
iLDexP99dyMfEkyt/Fj/gAjnysZXHET4kISQRlR2JRHGXOzGkkN3I00ZzR6b
ViIIZbKayhvyIiipClF/Q4QhhrJywxoeZKhB2Mc7RISr9/gqOuV5kBNZ69Tr
b0RoCwsI9hXlRtFHdZgoHBgUb/XHjTiyo+TJugfiezAQuPg85cxZNpTlrWu5
tQ+DY0Li2xhydqGSUOKtOmUMqF+IVI6frKiGoZ6aqY3BY2chpHCQFTVdwX4E
kTBgcHncd9qdBQ1m4Noq1hiYXRwfqV1kQuP7Gj5zOmKQPKLK5IqY0I8CFP3j
BAZLRpcko1J3oG2V0FcUgsFtc9ulSDojkn1L8t6XjcFUd3cNaX4bUrVt3r1x
FwMXqQffj7huQ8RP5Lrhhxj0+3g+uPh0Czf/QWFJf46B35sns4O1f3H7gJZH
/m0YkMqpolMvN3DXP1Rr87cYXP8vQuza4Dp+hlX/Dts4BplFqjbvef/gkUlt
+t9mMBhTUd9g0v2NJ+yhz7UuY7DIymc477mG35Yy0I1kwmGRLrekMPILfwVG
/WuyOBTufkbfwbyCv2vrDB1QwUGNbs7S5LSMfzI1lqjUwWFH/rxM67MlfMnB
xNfXGAftiPC6zZhFfOPLa36T/3Dgv6/6ZGJlAWc+ZfpM3gmHvWJNvIFuC7jw
WbOdk7441HyKuLPxaA6X2va2tPkMDgc817e7P5jFFWPMbe5cxKF/08mAo/wH
Tkq3uOtw7V+8k1L17O9m8JPlVlhfFQ4vNyWUtf2n8Dd4A0WoAYezdpLvVqon
cfUueeOjbTg0+D/wpjNO4luT2498H8RhTi2ki/f+BO4a6O2sMoqD8h4ZHh2m
Cbxj+7BnyDQOn0gvdOxPfMHTRMvOMP7GYYxTQGJJbRz/XSwSYbAdgfHN52MS
eWO4EyEmJmkngrwC1bDnfGO4nKXTdRFhBIk6icsVzKP48xj2SjVdBEmcpT12
6h9wSf4zT8+SEfBuf2+SYj6Cx+Z9aWow+vetPfxnpCHgPW5VX9dj5IBg7cIh
K8XuIbzGUHo4xRUBmeVU+E6mIXzfUMrooNe/Nd0kVImHNIhPL3nMu5xHYMt+
n/HH637cJOLdr+LLCDD5bSdPiPbjFRywOX8VQXi6XKut3zs8TFaAIywXwdmd
XPe3y/bhPE4t8mkNCNJ0S80le9/iwd+VVd+3ITgjQmrjo7/FP5zJ0RZ7i8C3
BKnmRb3BC68F0B+OIujre6RvGv0aZxP/bLY0jUBWcpbOeK0L9ysxtNVaRCDk
zsZkUdSJ35zgVhvfBsBxxeL866+vcPMHrZpMTABdtwPex3O9whn8w3RkdwLQ
fKxFGaAd99ia0vPhAZA/bnNAv7IVVxVuMP8jDhB3q0b3w0QzPjEaaL1XGuBo
fKDvKt6MZxTJ24E8gOyg/1WL3CZ8Q/360WhVgKaAJav9Xi/w0nUjl2JNgBr1
Q86U9424c9N29y4dgAOfn/GxmTTibWbePrxkgIC0+7bD4c/xc3sk/TX0AVJF
Djy/FF6PK3wcCrIzAnii9CfWPuYZnnqScj7XCqCsWKoxoaQOd7gskiDvCsBd
XF/pYV2Ndy8nWRZ6APwMsMuLuVCF6znvEJLwBtgnb7EuUPYEl0azBULBABFv
wtauylbimY+Oe6WfA6hKCzL+7fMYZxMdUOUJBzARRYZjTyvwhbXnDayxADEq
O7bTPcpxZ3e16KgEAMNt3gVH2srw/v4i420pAM3Dmo/4Fcrwuork4dUbAF/f
dvMFsJXgl7yclycfADjLzr28+K0Y//V+oNa5DMC4dIZ5bfUe7mFgFPGpEuCX
z4cjG5z3cGNpdY6B+n963R4rifqvEH+edq/PogmgvWwz5WxUAa7CuDfrdStA
fmit3Ke6fHzPKJNMyxuArN9RDYvEu3is6blZeAcwWKD8WjI2D19/Nvf42RCA
owhLfOfwHXz0xiBUjgGoC/Rey0y6jd+3Kra/uwzwnHDMrvxCDi7atFd8/xrA
rE1cxGO/bDxJOXUqawOAawHz9PPKwgM5QgNTmfTgO0NaWWN4Jj4ZOq/DuUsP
ItPvBpZcz8APz7hsj+PUA9pxq2tsVddxvM048aKAHmRmGNZPsqfjZRovrP+K
6IHxoZnMd+Q0XDJfQ+SsmB6saf+k8ERew1kv7rvnJ6cH/2X3bfjtTsV7dRZe
HNXVA5c/zDvVmZNwSrFr7AjSA8mHo9ahI1fxaoFhU1uKHhSPZl978jQBz1l5
MWJqogfBxIaXwdlxOKeLZl6HhR6sTsjKQdYV/GLPfQ+ajR4ofbGWv5gXi7uV
XPuJHdWDU9Flqzzd0fiQKOuzWhc9+Ov5TaF+4TJuFB8WqeGhB/4Tf25eF7mM
K3uc4Dp0Wg82prfnFMdewn+LE+REL+lBAnuxdGVNBB7YkbgeGaMH8YUEfm7B
CHzBf/L1t3g9EOlstsr6cwGfbE73r07Tg0odaWOF8jDc2WuWsu+GHnzzW7pz
JicU/8hHFbh8Uw+S1z/zLqScw9+dWHlqWagH3RVtG3M3zuDmnMaJtff/6fPC
tKvlQQjeWXX3mFipHkytaR5yaw3Gm1ismOaq9SB76adMM18QXlZcbnrllR78
+Ljs1MzhjytY7hRfeK0HZ+PPCBQ5nsaL/hxbtunVA8s/AvkClX54rhF3ptSI
HozdT77nMOWDC6+4n4z/rAdJakKZTTXeeHpOA3Hpix7EbHESgtK98IRZn7GG
H3rQtVSoud/3JM56vfWx9KIehLOd3292yhO/hO+LvvpTD9Ia+2OIpz3wc0mv
5Y9s/qsP0ljeZKYb7qGiEPiLiwRvPxY9p5m64BPDl2iOfCQof88FQknO+NHI
EcGXgiTYLLrMcmDwOG7TF1efIk6CppAp8/ehx/De0PGktQMkwDhmM5nKjuIm
UjrOR+VJwNUr8ehloBNOCfrGfEiNBDVNnlF14g5441694WsEEnRNK7nx7jyC
67ZmPvijS4IAi3Fb4fXDuKoA3bydQgKH1by4or+2+P7awhsuNiQYPsHx8qy/
NZ51fPNUhz0JtHepWvzOt8L37LLBVY6SIJd7+9sjny1x9iNMXzbdSZB1kXHp
5kkLPJbR8ckJLxK8mmG5MldnjjM+rIzp8iPBo36ZdkZec/zPhotC1lkSCLbs
3LVSaIIHFzzd3HaBBBmNxkkN54zxRZPdPe6RpH/zrU9Cxt4In85tCtKIJ4GU
3t0GDh0DfADEG97m/ONXszU150/Fw73mXny/TYJb7seF8wspuGzm05fMBf/y
Ffgd3z5Gxs/N/9dBfESCDw/8Viy9SbikiORr23ISFL4vvK5Vr4d30Rbe+D8h
QdK+9cKE3Xr4vty4/nv1JGAaijmmWIDwtle2Q80vSHB4ZOrSsyAc9/spNfKp
5Z9eX97d9rTA8CbjhlG+bhK0fLuRnSCri7utL3+P+ESCc1xHWIqNCDiXzIu5
7HESGEWHzbSd1MRrLBMXqyZJYMydcEYtVQPfdV929cccCTx/zjY2rqnhj/t/
/mZZJkH4DBvBgqCGO2xv3pBYJYHkoUN32M6r4iV2jgyHt0iwER8ouiqqgttG
yTMFMpL/zUedI/eDlfFtZassSSxk0BS0vCjwSAm3ZEnlaOEiA8P+u1ozZofw
X09aBVXEyOCLCmjyAnL4rbFrIsZSZOBR8Z+qE5fF6RzH97nLkiFrmO/JOQ0Z
PMt1XfKmMhmoO7oaVUMO4OTkdukadTK4XXzPEpsvhf94mi7Xp0WG3A99tq3D
kji+W1lppx4ZBO+/h0F7CXwK/6siRSXDD1udHXsLxfHkkx3qyIAMU4+Jv1TW
xPDxF646QRZk6OhN804/uh+P9rtBHTtOhuPOWkOhXcK4Uo4bfeMEGT409xtP
NAnhQ21qRgInySDr8XX+aLMgLr+/29zEnwyuSIbCP7YH7zPMtvIIJkO/UG7L
jb/8eFiwh82lc2RICyUNtUrw492vGRxqI8lw9MArz77Lu/GQ32+c3kWT4edG
wKM9zby42IGbx+fjyCBjKjvwioUX9w8juB+49o+fUs/zE4XcuMBBL/+Uu2So
eJSWdc2ZHY/YXCUw3SPDa13HYE5FNny659LfMw/JcE6qX+Y48y687kx27LEn
ZOjO4DQKHWHBJY1lTN/VkiFvt3QkbZAZT9j/eDf9+T/8YeXyhY9MuFNrR65S
Gxl23Dy2c/+uHXjbDRvXu51kOJTgvtSlyIgre4/LCbwlg3JD7e+HDgz4dr4/
lZtDZPAOjYqJ6t2G5x+X63w9Q4baXw+i+7U3MA6NJ8l682So6T2h3MmwjgWz
6tk8WSbDSfanDl+GfmP0UruxnA0yDD29bmN9fxUrj5wo5N5Ogfp58atF+b8w
YRs/rygmCghOeN3juf8T+74Rs3qKkwLhPaFPbd8tY9Zvd9d/5qVAgFYdn83a
Evbs7q1IKwEK5J0QqSo9sIQlGlZz6IpRQDEm+OK3rAVMNXNScpcqBfxf68cz
d37Hsk/5fzuvSYEXu8QyU9NmsB1os2RRhwLf1nLPnjz1DRv4yq8zTKaAthTf
eBs+haHaO1vGdApEnk5eBJ1J7F7CoZZGYwosF0v7/YCv2Fk1qvm9/ygQJ8wd
seH9BRtn7uEXtacA+UYp4cK1cczwvcNIkhMF1ub/Ur2axjDRi4FuIe4UeDqd
EvZbZxS7bL1N4fupf3j+jAcrWD5jczIJi05+//IPXBEzKv6INXbfDaOdpQBc
dAk/JjSCyeUpkerOU4D1s/yNG5PDWGrQUxbFSArE+lrpH3gxhLmK9qXyx1PA
Ojia+DN7AHs972R3JYkC60JLI7LZ/Zhm88zev9coEHJDiXK14B3GcpKheCKH
AoM6xFzG972YH5boY3eHAq4XXVuVGHuxIW5h9a4CCsSYnqlr1OjB7lerNDwu
oYD8D33dxZNvsN3x9VEyjylwfl2C9RljNxbmZGCYXU2BhavT1w0edmGmTMf7
IxspoCCXYfNXrgObOOLcef8lBao/rAR48rzCQitcXvS2UyB79Fbj8R3t2L2j
bo8keiiAH45c28vWiuFV7ncN+ykQv9rDtX1fC9bP7nnDf5gCTgWRliU6LzGG
ulOXm8YoMCvdK9Sf1IRlcnuHznz9Vz+CPt5JbS8wJXef07wzFBgiROims7zA
HPhOOzovUeC3Z3CJPd6APfEJ1mBgpMLvCYmBT/p1mHFLyEF5Fir86cpSzpCv
xcZFzopbslHhSoeij5pQDcb5KpQjbzcVDuRZIHnBKix//3nGDgEq+Dcsh2TJ
PMF0gy/8XhShgq0NR6iQXiXmIXnxq54UFaQfkIh3kiuwzbORI56yVMgnLkp8
aSnH0t9e6klRoEKJde/bAsZyrOl8dP2YOhW+t7z/kqZYiokOxadfpFIhpqfs
I1HhPlaheDW+2IAKuRqDS+XsxZjB5cSLPSZU4HqdHmbwuwgLVk3xFrehQl75
xPrYSgHGfiXVxcCeCjqp6h8XGAqwvM/XDp92ooKoXdEdTCQfe5NwnfrCjQo3
t89zjXnkYW5fMnS/naRCrVh158mbd7AN7RsqPL5U2Gzk1sh8fxuTncreezyE
Cs37d7uNvc/FIvXu/NwWSwWD7y42XYM3MMHMvO+yCVTw5JE9db4mEyuduztm
nkwFRYXbbYEFGdiH7MLXtzOpYM9j+/tgXjrmv1TU3J5DhaoHjttXytKwnQbF
tQu3qRB9V4PO23EN0/z1oACKqcDTnGqQKZSKdRk/yvZ49E+/JrNqRbMUzOVu
SUpyORV2VR7zOnM1GUs2Lz8/WksFVkcjVWdqIiZdVBHA+pwKpHDLlk+LCdiz
v489lZuo8OHJ9cTNh/HYt/tV/0V0/D+/nL8VxlewWN1s22vdVOBvC/C+oRGL
yXaFHy7s/Yc3+IjBRj4Gc5ulO3a9p8JbtgvWjhqXMeYLh45+/kSFx9s77tUZ
RmEFnLzHl8ap8IDF8xvvyUvYhNKIq+B3Ksx+2r6Ho+UiFtXY4HZwngovW7aT
J7ciMEmLfA98mQq6R/wvy5IjMGd/by/XdSrsX/1sydR8HmNgtPQJ2aKCcJhc
21hIGHbnmqZfHCMNPti5qnzTCcVGK7cCythocGJ2R5HotzNYBHUiqJmLBhYq
y4LyfSHY/oH2kIHdNDg8jr+WehWMOa2mhG6I0MDSP7zjy0Ag9jcm+DyXGA18
ij+IVc0GYDmCR8IlpGjAUyLgnsIZgI1oS12iK9DgNV+nZqXXaexcB+vlI8o0
uLFvNVup2A8TPjIb7aNOg6RNqQzND76YXVhVXBqRBg27ubvL9ntja+zZCUVA
g1DLJbv1wVNYxs3wxDoKDfanh+gF5Z7EBp7TU0eNaVCb8X4h1coDCzY7lLZs
ToMrn7di+PTcMf5RnuvM/9HgNN+9jAgdN8x6+8gNBcd/+CaXzfnMXLHllIZs
dJwGH89Uxeh7umCpEvk3LU/QIGOdbTz0qjPWQ/a+c8abBkHug0UaS8cwv3cW
d+NP06Cgvpk6q3IM4z6hWZAbRION174CfCtOmGn01r2X52kgcz+PhY3igM3t
mbg/eJEGnUMyvD4MR7CrRe0PZy7TYI/NlT2T3YexrvaUMu5EGhj8vSVQkmSL
eR0OrpBMpcHx812d7yNtMLYZ+0rN6zSgCwse7b/4H2bIJlXjkEsDowdaB5Tu
WGEz2ax1vnk0KNQwvXij0RK7ojD7NLKQBiKiSVlT3yywdpOqhnslNBhvY7oV
ZmeOeXzKevG0ggaefFOPv2ubYSy+4c3dVTTY/ZVrn0+fCUZLpretPKfB4rkK
DQMNI+yr2KFXLM00aE0XO0ffMMCiynk6hdtooCnmoiPVQ8eae993wxsaFHFz
dbPn0TAJtgvXHvbRoK/5RadhDBWLJIvbCQ7RQMMhP1LiHAWDSvex+VEa9BR4
MuyOJmG3f+wqPPKVBgn54blrN/WwLamSk23faHAopuQb9wvAnqevLOcu0YAc
vLxy3gTH9nZn1OxapYG+brp6yVsiFsasez54nQbL1W38xm66mG7IRWbTHfog
1sJWYtuihWWVSnXWsurD1pOtZomrBOzPVFvSAQ59KHwaRuV31cRq7DiF/vLr
Q39bmOo1ojomkFL+0UNYH+4xUY61ENWw4FfWee/26cPzTxWPTxmoYho62Qcf
yuhDD+E3teayMpbmjy8IKOhD2JLPr0seStjK/bHKS8r6cKJnSYP9/SGsQkQW
P6KtD72TbooZv+QxHutOhjZMH6Y+vlFquSWH+SX4tKmS9CGGVB5Rf1gWU/pb
ab7LSB/G/mvgGN44gCVq2PEHm+lDXOnfs+cmpLA57/XhMSt9aFvlLR0blsQe
ftJzqXXQh8kQv1an7+IYm8BXmQPH9UFqhNWQwCyOnTSL/ZF8Qh+ctLYL2yuI
YXKN3UEePvqgyLCroUh5Lxa7dlrnnb8+bLufPGJUJ4JNK/NvoRB9uPEqoNrX
RhgrvHMkViBCH1ReLPwpbBLAmN5vGl+K0oezgrfKOFL2YK68eTzzsfrAmk9/
dsOHH5O8NJ3VmqIPc+2c0hrWu7HIp/FHVa/rQ4fezbgJe15sfFlRKjdLHxxa
vp5d8+bBbrsGPQq6qw8Clnf53nhzYVs5gv5jRfpgEpfwjDzIgTn1P9U0eagP
6JLc6IY1O7aXxtAo9UQfDFWy6o2v7MTCLhREJdfqA3uUU/9OnBX7UEU32Kj/
59/CsWnDyIJlyST19rXqg0T7eS/3Zzuw30dVM1CnPkQnn0kuLGHE7DL7jzx4
ow+hhu2JXiUMmMBO0a+RQ//4TuX4Tfdtw4L1GornPujDu3sds40LW8SBs84+
9mP60Lh0qrjFbJOYNnNvVWVGHw6LDNjWGq0TS46/Hzu9pA+zMjplyw1rxLYh
tq7yP/pw0Ow+geD3izhqhlUtMtBhJWXhNqftCvFPq89tFTY69G1ZzV/0XSLy
4bfjTu+mQ16RrTPbkwWi4pOewHIROkTt3ywT1p8j0hUYjy5K0uFnRb9Mqs93
4vG76gYqCnRozOzNejg8TTwn7KZ2Wp0O7qEBrITISWJaSsbeciIdeoKiVq46
TxBLWF+xLFLoYPC0JDs5aJzYHv5nUdmEDiopS7T0qlHi+K+DH/z+o0O/FsW4
nvSJuO7t2FrmSIf421IaUq4jRL6viWULJ+iASizqHDuGiIoOjVnKPnR4KHJq
mM13gOhsKOlbdoEOGd/s78o69hLTtaLJykl0WMtutYli7ya2S38TKLtFBwlR
/gbL1HbiBp/xD6UyOrz+3hzAwP+SeOWt65hZJR0mmPtf1wg0E/cknB/wraHD
3zBCSpN0E1GJsbSxtJEOZlMdkmfdG4nOizzpSj10GH57yVnsVR1x/qF8nFk/
Hfa75i+mBNUSwzzI4b7DdKgrnKu+pVpDvP450LN07J/+/okKriNPiK9eD2JK
S3Rg/JqV4tlXTtyjUvqz6Bcdxr5/1q/5WEZ0Tot+JLZOB1aWxgqVmVLihr3G
Xt4dBlCk/0LmcfJDouJ06sYKvwH8Cqxjv/K5kJjGYPq0TtsA6JkP78zQbhKd
CC+1aBcNQMDKvIK7O4b4ICt74fllA1j1TR3ruRBNXPvrf48QZwDciomO3XqX
iSkvxQXlrhlAgZW0UfafSOJLi/BVtgIDWA84/cAbv0CU89Kp6mk3gEav/pcH
5AOIK7fL1By5DeGahdWFO1ediD4xf0Xi+AxBVNbBInrJgTjtbbijWtAQJn7o
sHZ4HSF+1Jl4xy1uCJUMdS8EbtoRW98JBL9UMYS5el0Djx4rYiZreM1BK0M4
/Dp+5kSRAZHoZ4L9STcE+8eMo2/sNYiX0AwtQ8QIjpk94xQeYCdaHFuyTBM3
BtVMuyvU8FrdPafzOZswExhwcD1jd9tBF5lUT63TTKE+bHX/ApVB10ko0M/N
zQzaTHsjmt/l6Hx6vLVmAObg4S4g/3qPhk5DY1D7ZLM5ZJaKFh4Q69XObmmc
z7a0gDph7dK4m87acsrPDgwOWgCpanWmcvCX1uDIvqEAe0tYiS7tsf0cpxUR
bjMuO20Jae05znv1ebVGYvF1Fy8ruOCVulz2IJeglX3oVIWPFXx/k9czxJVD
SHskOrLttBVkfZrwuvLwBsG490/dzSArsM2e1f0Ulk54JlJ9bvCCFUxxY04V
exIJuSVKfwxTrOCU/9X8XL/zBOd3Yr9VqqzgTYD/FPp1hPB8ksszosYKBivC
1xsTDhOEf28OdddZwcg2O199O1tC396PNacarKDuh7l4UZgVgeJ+40xBuxXY
9/exVEgZEaT/8KwJjlgBeeTPpwh9HUIk+3YP949W8CIosEp0i0D4tG9h8Mln
KxA5IvoZvmkQMsjd1ZYTVhAp+KpdhKJKYL0aF5IwawWk4MIp5WNyBNdbZ6fe
z/+7HzQZn5eTITSWe9jKLVnBbqErKT1SBwhnB2iE1l9WoD5xLvrYTXHCwLRG
Ed9vK7h00p/rzm4xguq6lIDLuhXwV0uwEez2EhI5+GLK/1pB6SWj2MdtwoSZ
/YyrW1tW8DGZMmHiJ0j4HxXS9As=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->{{-25, 80}, {0., 22.555029841236305`}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.503704845578125*^9, 3.503704884390625*^9, 3.5037049536875*^9, 
   3.503705436140625*^9, 3.503741813921875*^9, 3.50374206590625*^9, 
   3.5037424563125*^9, {3.50374271159375*^9, 3.5037427484375*^9}, 
   3.50374280996875*^9, {3.503742950703125*^9, 3.503742960109375*^9}, {
   3.503743256296875*^9, 3.50374332528125*^9}, {3.5037433780625*^9, 
   3.5037433881875*^9}, {3.503743459109375*^9, 3.50374349715625*^9}, 
   3.50374363959375*^9, 3.50374381065625*^9, {3.503743857515625*^9, 
   3.503743871453125*^9}, 3.50374390609375*^9, {3.503743939828125*^9, 
   3.503743949671875*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwV13k4VF8fAHDZSiiE7Hv2MAbDDO5X9t3MYKbIXklUVCpbKkVaiSg/S4mQ
7BGKa0/ZZQnZYizZU7bwzvvXfT7POffce77Lee6V9LhAOsXIwMBQtYeB4f/X
rBscQ7u72uj6LM7/rdlPhMDi5Fmzpo1G4+Tyfbx/Im3R2bO3FrVR94obbMej
fiKr8SYbLCPa6F55Ptb6zz8RJDecn6NKGx2KYm//bjmB9Pav2gmEaKPau9mL
eKdJhFn9R4PaOg7dSGFfiU2bQhLKlKxXFnFozcv5xfzGKURRL+hb8RQOTZR7
KcA8P4XYmR3+qdWHQ8lBdtsk/DSS5EJk0CvFoQ/csZmxfdOI+v0GvPllHFr2
NGyyV2QWcZ94l+++pIVmvm644/ttDrksdKPQf0oL/cxsUtrBMo9E2dkV3xzW
Qrmd8VfCcfNI3seV0pctWujX6ET5+qR5ZDMOVzWWpYUWMyIGU2cWkDjjmhZ3
dy2UwS1dJWjvEvI589uMe5cmqr9hMnCjdRkZHMr45d+siSY9Y1q2/rWMLPBc
nb+JaqKCa4sOZmwrCN8NweWXeZrolzjv6VrjFcSD4rI+Fq2JGnFFWPegK8jW
3mlWD0NNtDoqPi+t+jeicnZL2qNEA8VWrIieHfuD0BLH6tlyNdCSSs8v7Yx/
kZTPTacK0zXQotr5QE+Zv8gB+bg3DE81UKFWzAse77/IAk1ZKdVfA52zuJMQ
v/wXyfdyUR9S0UCbuSrcnTjXETW3GnDMxqLtWh2ijmc3kenHb8a207Ao5bZb
TM2TTSSt+uGtjEQsKhLE+9LtwybCJX6ifjUSi4b0MlzC79tCln+smD49jUW5
OkP+eeRsIUVOMrYd0lj0e1va3vL1fwiWEnnSIkUdVT+XdoKjehcZ4HlDE36m
jprZ/m67OLeLhLc1Xph/qI6Som7MsHIyQIsx660noeooLdQMt4FnAC+NO5m9
zuqoHNOqiFYiA8Rx3170EFZHxw4En1ak7oG/X8NuBidiUIyW26mvC4zwX2TK
fusnGDTsUcAxhI0JjhlWPRWLwqASaZnC3dJM8KhiO6PmKgbVNvik53ScCeSy
Q77spWBQZaFH6UsNTEC9G3Qojg+DPvQ+bmqZwQzlEJiRG6uG5tu08qeEssJo
rkB2yz01NGA8dO9sCiuwClbmzoWroSsNZ2zcUFYgLe8WK19QQ6exZyJbmPbC
3Mt7tbmWamiPYapJ1oO9IMGUPJLLrIYKupiYx2buA477kdgT8yqo5B0uf9d/
++G4Zwv+xaAK2t5R6W8uzQ6ZBO5jA80qqNpxc5ynBTsgcy/sTmSqoP4+4fWy
z9khwDrP74SrCno9Z9+3FW0O6D/Y8+ZE51G0efb5+cabnJARJyXi9F4ZzSV2
ubeJcIGuW4z7l9fKqHH2q7xpDBd0KTG80YlTRoum/5oJmXIBQ90PjMAlZdTH
jFZU588FJ5YTTXvUlNFFVrdAzGcuOGBz8JJtrhJqQ5tLv3edGwL3/ms2TFdE
/6le5ny/wAMc3T4Hi2MVUdmndzOHWQ9Besp3e6lbiqj4pNCOpPgh6NAsG2Fw
V0S3Yiy0/9oeAkWvgD+fxBTRlVBb1r6iQzCCTktov1BAf7Gl374fygtmQT1X
lWPk0auX2d5ayfHDSKZ5kfYNedR2KtdYxpgfArs/zRn5yaNNQZE8op788Fo5
0/2kuTzqJX46JyCVH/aMBFo+2iOP6rVLZRUIHoYKQwHxJX85VKbP4skjXgE4
yunUWEySRQWvKqpHyQhBvU47AwqyaKx86tkPJkLgfNqQ0KIii3pwDx7iPCsE
0dVKBRP7ZVHs6z0KMnlCQPP/95yv7gi6QnZT48ALQ1pvst9V7BFUkFXv9gBV
BHjSRnkJvDLowa1yF9liMbgz0SSexCiDMlZM4dy/i8G6fL7i1pI0GqtVRK7d
FYORwlCobJVG53sLS9asxCG3TsiXECmNakX6NGJmxMF4yr6OsCmFYrfcNELi
JOCaSrO/7qgk2oUb0tH9KQkfr3smB1PF0RdvVRy0q2VAa+aO6gucOIqYV49+
75GBAmpWzQd+cbT+e2HKozkZeI2bn/zzTQw9pPO6ByN0BO7/CVS5SBRDHzaO
KrgFHoET/tHVXhaiaNBRO0UvdVlY9y4cs9YVRhekNwxNyuVAg7p7RELiMOpx
KuTkMWYlyL+n/OraP350/fdzjIWUEihWHhfr7OdHgwaFd31ACSTESvhvxfCj
nTxZOWshSsA54b13gpEfxX4NQ/TXlIB2oWv6zSQvqmhbwBW1pAwJkRlvVd/y
oP/a+xbM/qrAb78EjzBfDrRQFbfJlYUBrpTn5DkFDpTW8BIRKceASluS0Ykp
drQ8K04N+wUD3ippsloe7KhjDkE0Yg4DQwtZs/OU/Shxkfl4EUYdGi9UBJw0
3IceOam9bVClDon+P27pCjGjyd3//HVGsRAya2Ly5/FadW3HpzfNplpQljz+
elxqHBFlWmX8GEWAsDrsUqAuK4h1/3LVYzSA6S/Jd4PdDoFK7IfKppNGUIv1
5zGwF4H8insX66zMwIrirH7wsRQk+MidznGyAtNjTESVLFmo7Rrl/StoB8Lz
RBUuISVYXcL2sR0hwY0G6ZtSoApdaY+ZZhfJMPr2bI8oSRXy5C5EktfIALH5
CoJeqnD3lO7d8h0yMLoSug5GqUJtcddQEKc93F0nSW+3q0J5Raxpl6I9NPHV
jP9SVQM/yeyJNi97aDdbimisVgOZYAbe3h57GM6zaQ4ewYDg50Ns33McQIJf
+77tNAbuHMUM8xU6gGeopLX0MgYulSnMW5c5wLTlascXRnXIsZB9nV/nACvT
z/sFZdWhbsdkSnvIAVikJ6fKfNUhv+4L2YXDEZQTgllXN9Thl5TlRqe3I5zf
8frcxIiFgix9su95Ryg8ZROdxI4FdsKE2Z7LjqClIXnAUBQLH83PrArdcATo
bOSLBSy4Hudo5oh3BHt2niNqkVigxvo50aodIfhGlqEvrwZs65XdJ3JTQGA+
5HSWiAb8iPFLG+ejQOkJ4r0JGQ1oFHSOPC9EgRXNzTZnTQ2wstStCpSmgPec
5QlrRw2o2zT0N9OkgP3xxYsqiRoADXV7FigUUMFqpSwJa4LaJkZD6TkFWtL2
1yjLaIL+FZoWVzIFzh4Y+emtrAlZ/rcyFtMo8HomUmFMVxPE2NMrkrMoIJT2
vaTzpCbopdcGlJZRYC9n6NeiVE3At1553veNAqO0uvXL0lrgsln/qGE/FbbT
+V56KGvBHcLTHq0DVBByP2Nup6kFrguRci+5qeAwuP+FEr0u837dHHUToMKX
diJh3EcLtjcpxAdHqFDyYSTUtkgLJG/HJzzRp0LnFYysXqUWKO70KsQYUGFB
/XabYr0WPGy5nhhtRAWFd7LirL1asHmTncHbggopL/3QjxtacI408K7FgQr3
orcYFQ1wMGA+bUQ4R4VMU+u3hy1wYP5G7NRnPyrUM6eSWcg4cLIn6NhcpMJO
2LHXo144UDv867fhFSpcvnTPOCEKBxsMc5f6wqjg4nw4irkDB5pRzhX/PaFC
sOBZtZV+HFx7cZe7JJYKib0V/SNjOMj/mr5ZF0eFbjsXhcrfOHgSJhPcmkgF
M+OML/6HtaGfUrInMo0K6ipYzhEXbci7wZgam0eFnOUL/JpntCHgcP4MfwEV
pN/nit+/oA3L5Rmv4gqpwKsrq44L14ZCnqwTISVU+GMuSHn8UhuuHMiq/VdO
hfOcjm6T2fT7reVcrSqpQOuIPUso0oZQ0pRb/Ecq9FI4QqZq6eOObE8OVVPh
w6ndNGRCG0Y+Ct9E66igpqCbEz+nDaLptUqD9VTInrtW/GtVGx799xu72ECF
F5dWGhJYdKAtMvQ402cq8OBU2+c5dYC7UP4KUzMV7m+e6zfk14ESF8Zf/+gO
uTk5uyirA00REuODX6mwaiS1aqyqA5y7Y+41LVTw2+e6nYTTgdNMLdpprfT4
Pu4/aGamA+QcmxnzdiogyV810s7qAM0k75h1F/193fbp//XXAV1XlbPbdKvJ
GJtaBenAelPLWGY3FSTeVh1fj9aB/I/GTZPf6Pk4v+Vh81QHUl3EsME9VOBW
1/Z9naQDSBj3IlsvFRjLC8PscnXgS3OYw6E+KgSFLERmluhAzjGp3Yd0/0aU
Yv591AGTb+pre/qp4Mvk/YLUoAMLOSS9C3RPNL5Oz2rVgQRnhc4eup2jx3J3
enSAMuNZpPmdCj3WYqX2wzrQXVky+ohuG26n6hyaDrzM7nYao7vxW8JnhkV6
vH6HSh8doIJ+4rdOxzUdKDAJxAXQXebEPZi7qwOEyoiEArrVxG0mGPfhwaY3
0HCa7qzx6HkqFx4C74kTBAfp+89s+psngIcDWEqYId2JZ5kZWCTxEJKyxXGG
bq6jBmxOCnhwZF6i3ab73lIoTyEGD4/3i3K8oJuxpEJ4Lx4PifUXQ7LpDrq6
JnPyGB4uFA/jiuhewWuoFFvgoaLBVb+Ebp+dizg2Mh5aKCuP8+ker3kHrk54
yMK+UH5Nt9OdWfP3nnhYf+LGG0v3NzM5MrsvHtj47E2v023F4eXsfhkPeV1R
Dcfp7jU8E/owBA91zz+4atDtHuyTUh6BB6MHUlH76J4r8quefICH2vpp/V76
/gNnL45yx+Phm5t6RDLdDFKX9+gn42EiXInqQnf08atSPhl42DBlqRSgmzcm
yPDZOzycH/yT20KPf+rnUK/a9/T9eGirBNGtyHDzzsInPPDt5UQk6S7BRWQK
NeJB7feHkRp6fj9nRk8H9OIhglTfuUivD9LwQ7bUYTwIizdJh9L9gy9G8SuN
Ht/JKVZmulciEnyl1/AQdmDPrR16/YV8fPHQdhcP2o31QgF0711NzgveSwCM
hJ7JCL1eRTxfL3UfJsBTS0HK/+s588UbbgYJAjQ5X9RjoFutK0ddWZ4A8Y88
PpDp9W9sUHg5QpsAlmma56c6qNBxrSS+AAhgkYDJkaP7REFZ6ZAZAZIHd0Lc
6f10XrxqXeM4AZzkg2Zq6P2WuP0lZPI6AURqmJY0v1BBSrMtmfsWAaqPXV09
Ru/fd76dVXrRBIj9wB9vTu/32sE+hmcvCGA1MvHOsJEKv8onIkwqCWC9I2n/
q4aej+WpjIA6Aiyc1rJrQOn5UPjVmPKVAEM5nIuJ9POGN3F539ogAa5kvxM4
+ole74E7D978I0CluJcW2wd6fN/tyetm1gXPJFHPglIqkCeZ23c5dMFu3QdP
fE8Fb3t2bqqoLpyMZZ2/UUSFWHWB+H36urCxo3kzJpcKkwuY5LM3dGFWeNv3
bioVlq4UGZpG6cIik1/xq2QqbP5Tn5WJ0QVxA9//ypKocIBdAzf6SheOfxc8
+TWBClpyWp2OjbrAbpzz9cVjKtx1xbMYcerBvRUa62AoFZ7QKt5K8utBlC2T
461g+nnoRyDtiunBp+ac01LXqZAXrJtaoaYHJ9Z1e6wuU6EvQV8HY68HOQMG
Ryx9qCDfccxPLEkPEsxN4xbt6ec/pe7Qv3Q96GHV45AhUUF32LDie64exNCO
nCPaUsFuzmhvfJUe3H7HOv3MnArX9pm+ZB/Xo+e/R7ZVjwrNYNmzLq9P//6w
OjQjQ+/HQrJed6k+qFnyl6/MU6Bdv9pIsFofSpx/mkTNUkCjRdHKtUkf5HL1
1w5PUWCXtsfpV58+5K+RvhwZpUCcSME1pg19iBtruLPVSYGqSI4SLAEB3XLr
qpgSCnC7NCjGVSOgNNgUEHqFAoG/1NQHmhB4c26l3dmfAkPX/tOR6EDgx9KR
d1p+FMh8esksdxSBLyPuq9+9KJA8wYUdZwA4Pn+Ya4RMAXWhartNSQBxaUEq
TY0CzneEHyh6ASAsAY0MU47Q9vsxKdMboD7jxdP2MUcw8GAWlPIDADzDucQh
R5BF5jMEAwGKhzYtBLocYWm9qnpfFECp9R9i50dHuO3r8Zv2FoDhQsZ/yjGO
kEPOPpH+GwATc2BfjqYjbEjiFERuG4C79vT+ofMOcPnLo61bkQawFdE6EeDt
AEsBtNaZ+wZw6m0wnsXDAWh18QFlcQZgWidwXsTBAb6dWq0kZRpAoo/SPT6C
AxRkF9rcazYA7m2pozhWB/DGKF/+e/AYEET1np58bg+9IFnd8d8xWBe7J+1d
QobDSr4BMemGcIy1qe/BDBFsWNx7bqFG4PlU0+daqS3M5JQ6hH8xhnOVufuu
dFhCXddAG7SbAK/ctStaXGYQN5u1hpk1hUaVH2V8GCNobu3TU10xA/WMugn9
AYDVtALsSS4LiHoYkjOAIcBtZNYkQdgSomtmmOOHNYHVTYiQL24JsaZn9dW+
akJ0uIVqk7QlsNgVM/WVacKTmpzDa0qWcG6nW800RhP+Mzw37ahrCc0iCZxF
RppQajp3j/+kJWydEr5a+E4DZm0XWuJTLOHjOmcIKQoLRLcVUpykFUTOidoP
u2IgTn6MjUXWCuQmK7IXrTHQv9SOXlG0gr/GvvgDuhhwuflOhYK1AqkyNsZL
AhjweeW9X8jYClYTBAYHOtXg1sRwTaq3FczQOMUkTdWgxPur2tt8KwgtmGsf
D1QBfv/XB2r1rIEW09P6Ok4R7n7c95dmYA0ylykaR64rwtpevx/sJtbw212P
pfKkIvSnaOY62FhDELGvSVZOEZJaGs1nXKyBJb5gY7tCASTkZyK4wq1hLY5H
/zVNHhRHjm651FoDvj13K8FaDhDrsqktExvI7l3IBqoMXISBmOuWNuCp/2d8
C5GBNOw2Yc3WBkgbk1WtcjLAIGT4ZIVqAz3nulXfr0lDLa1Ne8bHBkaHr2fG
JEqDSTjtXu8j+np5lo6Bw1JgU8ynXNhrA5RUpd3EIEkIy9TuVRm0gfVoYOY+
JQn5z53Cc0dsQNpSVjrFVhK4wl9+ezNtA7LPZoPXZCShy+poaMqmDdzxF8Vl
dEiAI82o7b6YLaS0d78fU5IAF8HLF0+ftgW8AOOp/T9FIdEkSLbdxxZwqmQS
+kkUOi+FD+Eu0Me/lvUmJYqCUdsDM7ZrtuC55XeszkYUFG9nSOTes4WfpfWr
HR9F4O9cb8dyri0cxKppdaUKw0NUBxP62xbMbk6Qq8MFoXEemZpcs4X4hsPO
666CwCBskmzzzxZUlJ0myYgglOOzmZ8w2sEhRyWBgB0BUI5/f9Gd3Q7mLrRb
mIUJAI9FmxmzqB38PXLA1CTiMAwX766bA/0/lPkg31AWH/A80POlHrODBC8u
YclHfGDsFTxy2sgOrrWfCr55iQ9yedcabpvZQaBG1dZTfT4IurIQ+8nODkgG
eR3bPbzAj/uhjHG3A9sndbe62XjBpqLCTeCWHeiZS97ZjuCBW7Hr3bIRdrC6
4JYX6ccD7320TDXv2sHFtcdVio48ICJcdJQUbQfRUpdMKuV4YDY4e/N+rB20
q57tZ2rhhrt6iXG7r+ygDA7gpAS5oRq98plWZweMaWHSotEHoWuOJ1my0Q4S
n7UU5J08CDSBAn/nz3YwEB2AvYI5CBz+s0JdLXbwi3LEKe37ATgh6er3qccO
ajw+7fNRPgB/b5rxxE3R16/MrHo5yAFHDYWdDdiJMOwrmnrSdT/AhQ9qIZxE
2Ea3vLA6+8E+yYGl7CARIIadqn1oPwT9fpynzEsEwQQhnvYmNviczrxHQJQI
zMOay4pYNvBiXshYUCFC6fnq0Cs8+yCpAV1MIhFh53F1hPQKC5gUJw4V2BMh
7sdWUFE3CyylXWxucCTCjf7trlPvWcAoRCJ98QQR2jcvi+tcZ4E59XBHQ08i
SJXLXHzEyAL6acin2UtE2LVZd+4VZobxoKponXgizN3leLlyhhEeeD+7apNA
BOnF2okWa0bQcjzv5fmcCGeOcpxpwjLCfYyY/sNkIgQkLb8RYWAEjenQ5dEM
IvDujUg3erEH7jroUaNKicDxvI3lwjcGUFD7eKSvj+7zhgZvq3aQ/oo7iWPf
ieD7ikbpi91B7hrbss8NEuGrjhw7/swOMnFifIlhlAiPhth9XnHtICl39n1U
nCZC6ikzpo1T2wjvoD0pbJ0IduNqcw+F/iEMd+fDjgiSYPfxs6uj2RtIPlfZ
sqowCeYWVJ5fjdhAXJLCvfCiJGgSPlOk77qBVBYcsrCVJAHXn1YGZ74NJHBQ
h++6Agms72nca729jsyp3X3bokOCodLNVLeza0jfoFj/pRMkMM1sxS07/EFO
V5jm5jiTQOurwvlA7B9kNfFi+JgLCYjnnqwoc/9BeBxr5W09SYBPZdxUbl1F
rDpOXVf0JUE5p3pKgOkqUlufKzQWSgKDyM3SMaPfSO47/EmblySgsT+2anBf
RvAPPDF30klAES2bZTFeRpp9HrB8zKDPT8weuCi/jNDkht8p5JDgqpLLj/rF
JUTy1c0d5mISFM80lLqGLyHPnn1OrawnQbgik/4Z0iISfsNxXH6aBFad5mmz
qnNIpnhFm84sCeTc70adZZpDvlaLVlrMkSDfS4Is1/cL4WeYfOq7RAKe8ElX
lxu/kNzwS8YF6yQ4ecNNqKhrFum7+SSL/kMCu+JNnPkRM4hKxJfzJopk4D+6
vsDMO4XYy6g4UZTJUHH7kV7XAg25Xh9j6q1ChsfZLIE9zTSknvm4RLQ6fb4B
khASTkOO35nqbMWToe39kqXJ0iQScZdZ08GSDFIsh4cffp9ABqP0tzx9yRCA
15g52jmOaCcdPVd0ngwCe76TX+eNI3HvRAYZ/MlA1g3eY/9gHLHq2qxIvkKG
dOvmwZNm48hH4bKgvjAylMT0J/HUjSEpeaqbFjFkkA7t2CivHUU8vklsYErJ
wGNb4FHT+QOpoh08G/6BDFHFXTKtz38gQhs7/W0VZLjjW66q7fED6Rb98eFc
NRky3uhOKawOIUZnnl/L+EwGpbzBQF+RIUR2k3tdYJAMlWKSgn9CB5BbHHu8
z/wgA7d+lkKJ5QAyLLbU936EDBRZiYVmwQEkwbCtjDRBBpXutxFrpd+RfQ+j
rz6YJ8OM2bssqz/9iFfq9amBRXp8mnN4ixv6EbTQm6KwQgb7L23yvs/6keu9
JrjGv2TAqxbaftPuR3qnNd/wbpBBff7QmVv7+xH1LZnDnltkyK+fUL051Ic8
4uSNLNymP8+OWaUjrw+ZFWda290lg9WD5cnzN/uQ/wG5+bW9
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->{{-25, 80}, {0., 99.43287619927187}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.503704845578125*^9, 3.503704884390625*^9, 3.5037049536875*^9, 
   3.503705436140625*^9, 3.503741813921875*^9, 3.50374206590625*^9, 
   3.5037424563125*^9, {3.50374271159375*^9, 3.5037427484375*^9}, 
   3.50374280996875*^9, {3.503742950703125*^9, 3.503742960109375*^9}, {
   3.503743256296875*^9, 3.50374332528125*^9}, {3.5037433780625*^9, 
   3.5037433881875*^9}, {3.503743459109375*^9, 3.50374349715625*^9}, 
   3.50374363959375*^9, 3.50374381065625*^9, {3.503743857515625*^9, 
   3.503743871453125*^9}, 3.50374390609375*^9, {3.503743939828125*^9, 
   3.503743949703125*^9}}]
}, Closed]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"sdsame", "=", 
   RowBox[{"MovingAverage", "[", 
    RowBox[{"dsame", ",", 
     RowBox[{"{", 
      RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"sddiff", "=", 
   RowBox[{"MovingAverage", "[", 
    RowBox[{"ddiff", ",", 
     RowBox[{"{", 
      RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.503806949703125*^9, 3.503807005203125*^9}, {
   3.504220536359375*^9, 3.50422053703125*^9}, {3.50422098640625*^9, 
   3.50422099584375*^9}, 3.5044268404375*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"h1", "=", 
    RowBox[{"Histogram", "[", 
     RowBox[{"sdsame", ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", "10", ",", "0.3"}], "}"}], ",", 
      "\"\<ProbabilityDensity\>\"", ",", 
      RowBox[{"(*", 
       RowBox[{"\"\<Probability\>\"", ","}], "*)"}], 
      RowBox[{"ColorFunction", "\[Rule]", 
       RowBox[{"Function", "[", 
        RowBox[{
         RowBox[{"{", "x", "}"}], ",", "Black"}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"h1", "=", 
     RowBox[{"Histogram", "[", 
      RowBox[{
       RowBox[{"Ps", "*", "sdsame"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "10", ",", "0.1"}], "}"}], ",", 
       "\"\<Probability\>\"", ",", 
       RowBox[{"ColorFunction", "\[Rule]", 
        RowBox[{"Function", "[", 
         RowBox[{
          RowBox[{"{", "x", "}"}], ",", "Black"}], "]"}]}]}], "]"}]}], "*)"}],
    "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"BinCounts", "[", 
     RowBox[{
      RowBox[{"Flatten", "[", 
       RowBox[{
        RowBox[{"ds", "[", 
         RowBox[{"[", 
          RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", "1"}], "]"}], ",", 
      "1"}], "]"}], "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.503634889*^9, 3.5036349021875*^9}, {3.503635211625*^9, 
   3.5036352158125*^9}, {3.503635248359375*^9, 3.503635321296875*^9}, {
   3.503635391390625*^9, 3.503635452703125*^9}, {3.503635722328125*^9, 
   3.503635724359375*^9}, {3.503635796328125*^9, 3.5036358026875*^9}, {
   3.503635863796875*^9, 3.50363586728125*^9}, {3.50363590090625*^9, 
   3.503635935171875*^9}, {3.50363602834375*^9, 3.503636044203125*^9}, {
   3.50363607809375*^9, 3.50363609540625*^9}, {3.5037047285*^9, 
   3.503704741625*^9}, {3.50371449025*^9, 3.503714526171875*^9}, 
   3.503715488375*^9, {3.503722961109375*^9, 3.50372297053125*^9}, {
   3.503741840203125*^9, 3.50374184521875*^9}, {3.503741879453125*^9, 
   3.503741879609375*^9}, {3.50374250953125*^9, 3.5037425149375*^9}, {
   3.503742648171875*^9, 3.503742649640625*^9}, {3.503805692484375*^9, 
   3.5038056999375*^9}, {3.503806969015625*^9, 3.503806979453125*^9}, {
   3.503822082625*^9, 3.5038220854375*^9}, {3.50382219096875*^9, 
   3.50382221409375*^9}, {3.503822325953125*^9, 3.50382234584375*^9}, {
   3.50382238025*^9, 3.503822396984375*^9}, {3.504220550421875*^9, 
   3.504220565296875*^9}, {3.50422082259375*^9, 3.504220830984375*^9}, {
   3.5042211240625*^9, 3.50422112859375*^9}, {3.5042538255*^9, 
   3.50425382590625*^9}, {3.50425386184375*^9, 3.504253891984375*^9}, {
   3.504254182515625*^9, 3.50425418825*^9}, 3.504254280203125*^9, 
   3.504255389046875*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{0., 0}, {0.3, 0.038910505836575876`}]},
          
          ImageSizeCache->{{24., 50.05432282003714}, {179.31429778191045`, 
           246.89496809218033`}}]},
        StatusArea[#, 0.038910505836575876`]& ,
        TagBoxNote->"0.038910505836575876"],
       StyleBox["0.038910505836575876`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.038910505836575876`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{0.3, 0}, {0.6, 0.19455252918287938`}]},
          
          ImageSizeCache->{{48.85432282003715, 
           74.9086456400743}, {-86.20838345916877, 246.8949680921803}}]},
        StatusArea[#, 0.19455252918287938`]& ,
        TagBoxNote->"0.19455252918287938"],
       StyleBox["0.19455252918287938`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.19455252918287938`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{0.6, 0}, {0.8999999999999999, 0.1297016861219196}]},
          
          ImageSizeCache->{{73.70864564007428, 99.76296846011145}, {
           24.42606705794759, 246.8949680921803}}]},
        StatusArea[#, 0.1297016861219196]& ,
        TagBoxNote->"0.1297016861219196"],
       StyleBox["0.1297016861219196`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.1297016861219196, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{0.8999999999999999, 0}, {1.2, 0.10376134889753566`}]},
          
          ImageSizeCache->{{98.56296846011145, 124.61729128014859`}, {
           68.67984726479415, 246.8949680921803}}]},
        StatusArea[#, 0.10376134889753566`]& ,
        TagBoxNote->"0.10376134889753566"],
       StyleBox["0.10376134889753566`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.10376134889753566`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{1.2, 0}, {1.5, 0.16861219195849544`}]},
          ImageSizeCache->{{123.41729128014859`, 
           149.47161410018572`}, {-41.954603252322215`, 246.8949680921803}}]},
        StatusArea[#, 0.16861219195849544`]& ,
        TagBoxNote->"0.16861219195849544"],
       StyleBox["0.16861219195849544`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.16861219195849544`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{1.5, 0}, {1.7999999999999998`, 0.1556420233463036}]},
          
          ImageSizeCache->{{148.27161410018573`, 
           174.3259369202229}, {-19.82771314889908, 246.8949680921803}}]},
        StatusArea[#, 0.1556420233463036]& ,
        TagBoxNote->"0.1556420233463036"],
       StyleBox["0.1556420233463036`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.1556420233463036, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{1.7999999999999998`, 0}, {2.1, 0.2723735408560309}]},
          
          ImageSizeCache->{{173.12593692022287`, 
           199.18025974026003`}, {-218.969724079708, 246.8949680921803}}]},
        StatusArea[#, 0.2723735408560309]& ,
        TagBoxNote->"0.2723735408560309"],
       StyleBox["0.2723735408560309`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.2723735408560309, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{2.1, 0}, {2.4, 0.18158236057068752`}]},
          
          ImageSizeCache->{{197.98025974026004`, 
           224.03458256029717`}, {-64.08149335574569, 246.8949680921803}}]},
        StatusArea[#, 0.18158236057068752`]& ,
        TagBoxNote->"0.18158236057068752"],
       StyleBox["0.18158236057068752`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.18158236057068752`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           
           RectangleBox[{2.4, 0}, {2.6999999999999997`, 
            0.27237354085603127`}]},
          
          ImageSizeCache->{{222.83458256029715`, 
           248.88890538033428`}, {-218.9697240797086, 246.8949680921803}}]},
        StatusArea[#, 0.27237354085603127`]& ,
        TagBoxNote->"0.27237354085603127"],
       StyleBox["0.27237354085603127`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.27237354085603127`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{2.6999999999999997`, 0}, {3., 0.15564202334630337`}]},
          
          ImageSizeCache->{{247.68890538033426`, 
           273.7432282003715}, {-19.827713148898766`, 246.89496809218033`}}]},
        StatusArea[#, 0.15564202334630337`]& ,
        TagBoxNote->"0.15564202334630337"],
       StyleBox["0.15564202334630337`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.15564202334630337`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{3., 0}, {3.3, 0.16861219195849556`}]},
          
          ImageSizeCache->{{272.54322820037146`, 
           298.59755102040856`}, {-41.954603252322414`, 
           246.89496809218033`}}]},
        StatusArea[#, 0.16861219195849556`]& ,
        TagBoxNote->"0.16861219195849556"],
       StyleBox["0.16861219195849556`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.16861219195849556`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           
           RectangleBox[{3.3, 0}, {3.5999999999999996`, 
            0.10376134889753573`}]},
          
          ImageSizeCache->{{297.39755102040857`, 323.4518738404457}, {
           68.679847264794, 246.89496809218033`}}]},
        StatusArea[#, 0.10376134889753573`]& ,
        TagBoxNote->"0.10376134889753573"],
       StyleBox["0.10376134889753573`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.10376134889753573`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{3.5999999999999996`, 0}, {3.9, 0.09079118028534364}]},
          
          ImageSizeCache->{{322.25187384044574`, 348.3061966604829}, {
           90.80673736821751, 246.89496809218033`}}]},
        StatusArea[#, 0.09079118028534364]& ,
        TagBoxNote->"0.09079118028534364"],
       StyleBox["0.09079118028534364`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.09079118028534364, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{3.9, 0}, {4.2, 0.11673151750972753`}]},
          
          ImageSizeCache->{{347.1061966604829, 373.16051948052007`}, {
           46.55295716137101, 246.89496809218033`}}]},
        StatusArea[#, 0.11673151750972753`]& ,
        TagBoxNote->"0.11673151750972753"],
       StyleBox["0.11673151750972753`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.11673151750972753`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{4.2, 0}, {4.5, 0.12970168612191965`}]},
          
          ImageSizeCache->{{371.9605194805201, 398.0148423005572}, {
           24.42606705794745, 246.89496809218033`}}]},
        StatusArea[#, 0.12970168612191965`]& ,
        TagBoxNote->"0.12970168612191965"],
       StyleBox["0.12970168612191965`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.12970168612191965`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{4.5, 0}, {4.8, 0.0389105058365759}]},
          
          ImageSizeCache->{{396.8148423005572, 422.8691651205943}, {
           179.31429778191043`, 246.89496809218033`}}]},
        StatusArea[#, 0.0389105058365759]& ,
        TagBoxNote->"0.0389105058365759"],
       StyleBox["0.0389105058365759`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0389105058365759, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{4.8, 0}, {5.1, 0.051880674448767865`}]},
          
          ImageSizeCache->{{421.6691651205943, 447.72348794063146`}, {
           157.18740767848712`, 246.89496809218033`}}]},
        StatusArea[#, 0.051880674448767865`]& ,
        TagBoxNote->"0.051880674448767865"],
       StyleBox["0.051880674448767865`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.051880674448767865`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{5.1, 0}, {5.3999999999999995`, 0.0778210116731518}]},
          
          ImageSizeCache->{{446.52348794063147`, 472.57781076066857`}, {
           112.93362747164059`, 246.89496809218033`}}]},
        StatusArea[#, 0.0778210116731518]& ,
        TagBoxNote->"0.0778210116731518"],
       StyleBox["0.0778210116731518`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0778210116731518, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{5.3999999999999995`, 0}, {5.7, 0.0907911802853435}]},
          
          ImageSizeCache->{{471.3778107606686, 497.4321335807058}, {
           90.80673736821774, 246.89496809218033`}}]},
        StatusArea[#, 0.0907911802853435]& ,
        TagBoxNote->"0.0907911802853435"],
       StyleBox["0.0907911802853435`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0907911802853435, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{5.7, 0}, {6., 0.012970168612191966`}]},
          
          ImageSizeCache->{{496.2321335807058, 522.286456400743}, {
           223.568077988757, 246.89496809218033`}}]},
        StatusArea[#, 0.012970168612191966`]& ,
        TagBoxNote->"0.012970168612191966"],
       StyleBox["0.012970168612191966`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.012970168612191966`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{6., 0}, {6.3, 0.09079118028534376}]},
          
          ImageSizeCache->{{521.0864564007429, 547.1407792207801}, {
           90.80673736821728, 246.89496809218033`}}]},
        StatusArea[#, 0.09079118028534376]& ,
        TagBoxNote->"0.09079118028534376"],
       StyleBox["0.09079118028534376`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.09079118028534376, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{6.3, 0}, {6.6, 0.025940337224383932`}]},
          
          ImageSizeCache->{{545.9407792207801, 571.9951020408172}, {
           201.44118788533368`, 246.89496809218033`}}]},
        StatusArea[#, 0.025940337224383932`]& ,
        TagBoxNote->"0.025940337224383932"],
       StyleBox["0.025940337224383932`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.025940337224383932`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           
           RectangleBox[{6.6, 0}, {6.8999999999999995`, 
            0.051880674448767865`}]},
          
          ImageSizeCache->{{570.7951020408171, 596.8494248608544}, {
           157.18740767848712`, 246.89496809218033`}}]},
        StatusArea[#, 0.051880674448767865`]& ,
        TagBoxNote->"0.051880674448767865"],
       StyleBox["0.051880674448767865`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.051880674448767865`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           
           RectangleBox[{6.8999999999999995`, 0}, {7.199999999999999, 
            0.09079118028534376}]},
          
          ImageSizeCache->{{595.6494248608543, 621.7037476808915}, {
           90.80673736821728, 246.89496809218033`}}]},
        StatusArea[#, 0.09079118028534376]& ,
        TagBoxNote->"0.09079118028534376"],
       StyleBox["0.09079118028534376`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.09079118028534376, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{7.199999999999999, 0}, {7.5, 0.07782101167315157}]},
          
          ImageSizeCache->{{620.5037476808915, 646.5580705009287}, {
           112.93362747164096`, 246.89496809218033`}}]},
        StatusArea[#, 0.07782101167315157]& ,
        TagBoxNote->"0.07782101167315157"],
       StyleBox["0.07782101167315157`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.07782101167315157, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{7.5, 0}, {7.8, 0.012970168612191966`}]},
          
          ImageSizeCache->{{645.3580705009286, 671.4123933209659}, {
           223.568077988757, 246.89496809218033`}}]},
        StatusArea[#, 0.012970168612191966`]& ,
        TagBoxNote->"0.012970168612191966"],
       StyleBox["0.012970168612191966`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.012970168612191966`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{7.8, 0}, {8.1, 0.0778210116731518}]},
          
          ImageSizeCache->{{670.2123933209658, 696.2667161410029}, {
           112.93362747164059`, 246.89496809218033`}}]},
        StatusArea[#, 0.0778210116731518]& ,
        TagBoxNote->"0.0778210116731518"],
       StyleBox["0.0778210116731518`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0778210116731518, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{8.1, 0}, {8.4, 0.1297016861219193}]},
          
          ImageSizeCache->{{695.0667161410029, 721.1210389610402}, {
           24.426067057948075`, 246.89496809218033`}}]},
        StatusArea[#, 0.1297016861219193]& ,
        TagBoxNote->"0.1297016861219193"],
       StyleBox["0.1297016861219193`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.1297016861219193, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{8.4, 0}, {8.7, 0.038910505836576015`}]},
          
          ImageSizeCache->{{719.9210389610402, 745.9753617810773}, {
           179.3142977819102, 246.89496809218033`}}]},
        StatusArea[#, 0.038910505836576015`]& ,
        TagBoxNote->"0.038910505836576015"],
       StyleBox["0.038910505836576015`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.038910505836576015`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{8.7, 0}, {9., 0.06485084306095965}]},
          
          ImageSizeCache->{{744.7753617810772, 770.8296846011144}, {
           135.06051757506415`, 246.89496809218033`}}]},
        StatusArea[#, 0.06485084306095965]& ,
        TagBoxNote->"0.06485084306095965"],
       StyleBox["0.06485084306095965`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.06485084306095965, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{9., 0}, {9.299999999999999, 0.038910505836576015`}]},
          
          ImageSizeCache->{{769.6296846011144, 795.6840074211515}, {
           179.3142977819102, 246.89496809218033`}}]},
        StatusArea[#, 0.038910505836576015`]& ,
        TagBoxNote->"0.038910505836576015"],
       StyleBox["0.038910505836576015`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.038910505836576015`, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{9.299999999999999, 0}, {9.6, 0.05188067444876771}]},
          
          ImageSizeCache->{{794.4840074211514, 820.5383302411886}, {
           157.1874076784874, 246.89496809218033`}}]},
        StatusArea[#, 0.05188067444876771]& ,
        TagBoxNote->"0.05188067444876771"],
       StyleBox["0.05188067444876771`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.05188067444876771, {
         GrayLevel[0]}], "Tooltip"]& ]}, 
    {GrayLevel[0], 
     TagBox[
      TooltipBox[
       TagBox[
        {GrayLevel[0], EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{9.6, 0}, {9.9, 0.025940337224383856`}]},
          
          ImageSizeCache->{{819.3383302411886, 845.3926530612259}, {
           201.44118788533385`, 246.89496809218033`}}]},
        StatusArea[#, 0.025940337224383856`]& ,
        TagBoxNote->"0.025940337224383856"],
       StyleBox["0.025940337224383856`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.025940337224383856`, {
         GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesOrigin->{0., 0},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  ImageSize->{719.1666666666678, Automatic},
  PlotRange->Automatic,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.1]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.503634904359375*^9, 3.503635216296875*^9, 3.503635269890625*^9, {
   3.503635311265625*^9, 3.50363532184375*^9}, {3.50363539878125*^9, 
   3.503635454484375*^9}, 3.503635785671875*^9, 3.50363585184375*^9, 
   3.503635911390625*^9, {3.503636021*^9, 3.50363604671875*^9}, 
   3.50363609946875*^9, 3.503704770890625*^9, {3.5037144970625*^9, 
   3.5037145293125*^9}, 3.503715474921875*^9, 3.5037229735625*^9, {
   3.50374181978125*^9, 3.503741847859375*^9}, 3.50374188196875*^9, {
   3.503742502734375*^9, 3.5037425164375*^9}, 3.503742651203125*^9, 
   3.503743814875*^9, {3.503805668828125*^9, 3.503805700875*^9}, 
   3.5038067996875*^9, {3.5038069713125*^9, 3.5038069805*^9}, 
   3.503812299390625*^9, {3.503822061015625*^9, 3.503822101390625*^9}, {
   3.503822192421875*^9, 3.50382222528125*^9}, {3.503822341734375*^9, 
   3.503822346328125*^9}, {3.5038223809375*^9, 3.503822397515625*^9}, {
   3.50422055353125*^9, 3.50422056625*^9}, {3.50422081909375*^9, 
   3.504220832171875*^9}, 3.504221124984375*^9, 3.504221446109375*^9, 
   3.504253840703125*^9, {3.504253878171875*^9, 3.504253894359375*^9}, {
   3.504254190609375*^9, 3.504254202640625*^9}, 3.504254281625*^9, 
   3.504255392734375*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Show", "[", 
    RowBox[{"Ppdf1", ",", "h1", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "5"}], ",", "25"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "80"}], "}"}]}], "}"}]}]}], "]"}], "*)"}], 
  "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.503742755015625*^9, 3.503742768609375*^9}, {
   3.503742835953125*^9, 3.503742876*^9}, 3.503743345234375*^9, {
   3.5037438798125*^9, 3.50374388009375*^9}, 3.503743929109375*^9, 
   3.50381203628125*^9}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVjWk81AsbhoeicihZj7KP7YyJ2Wey9PwjSr1SSZZkS4XqWCIqFUq2snco
+7HX0CJkKU+i0yCyJISyVHIIvaWyvr0f7t/16bpuNTfvfUeESSTSk1/7P4su
ivcvL/NQrVrMW1DoCIYiBw8/+c5Dvder1sQcOQSt0cXjYVM8HIg9o/lV2wm+
Xjf/KfKWh+QuURvdGmcAfoic+GMe7u7YvY4S5wod9LaMF+U8lI6msQ2E3cC9
UkkzroSH36wEITJBbhBdX82UyuCh+paBPo8Th6G75+ue34N5yDT66nDyzBHw
dDLt6T3Fw+TddurFK4/CwkiCc9pxHppwTGYNko6C+pTen8oHeVhRMPiqpPoY
nBTxjNEw4OFSHTlDmO0FpJhKqQ90HkoFHzBTHvCCREnRm4V/8LAxTTDIijoO
DzfmFlEUeLiu3flGyeQJWMkYaKT94OLL6Wgbt3FvSKnUtfwyxcXLk+7Npxx8
gGJ8tqvsIxenDbXaZep9YM8O+RHOay7mXJbaUZjqC2lOe0nGFVxM6PfjJ7if
Ar3RrIilEi4aemb5WwyeAvT8vBbzuTihGbe93cEfPvjHKJle56K6V69LnGMA
MGIaDSz8uXhryzuZmMuB0CgpUy924lfPo7z7ilwQ2P3lZtFy+Nffx9iY17eD
4ELOsq2VNRdlGyeS8d0ZaKrcHGDD4GJlvV9yfUAwHDKOXJCjcPHwFv6iv8Z5
mK7vvtSjxsXMwEZn+dfnQa71VOLB9VzcavGpLWTHRXAdLbnjOs3BHwsrzbT1
Q8F/w8V7vh856JXL77PODoXIPXvKQgc5GC6l9s1QJgxKa79U5LRwUP7m2vTz
Ky/BXDL38VARB/3Kw1YkrA4HiebVOJPFQR+j3yZdE8JBVajviVAKBx8vPS/3
V7oC208GN6qFc/BpWEhuMURAstmTFldXDu4VkKY9S6Og8Fxiq68dB81bqhxd
rKOh+t7hl6FWHFyRc3aJvRANQ0qiXTnGHIxS5sq8sr8KerM73wwpcNBDYajK
ZnscbKUqDsxIclDLNF3ujWg87HebHBRazcGio3l1B07Ew7nWuGG1WTam1pek
uG1JgOcFXZ9cO9i4FHEjcDMpCd705//rK2DjeVObQlpgEnyWCpwMRTZ+kyOr
DU4ngexFhZmcUjZWKg6a/TWRDG62Tj+Gotk45XWFRF6VAgHX9OdmQtm4PDpt
63c9BSKfkhaEzrDxxmPW2H+1UqFUP3dZ7RgbKVM13HbrGzC/akzUzZSN3bOs
7MHuNFi7pWq1nwEbF8hVlYUh6aDuHy0WRmeja8t1S4ZeBux4R137twobW/PT
3/QmZ0LyQ1/Z4XkWljULaqwF2aDnOU92e8BCreKguKv0PPiQOtSwhs/CgE0u
y8dy8iDz+T9H7uWykL/1pV+IdD6s1UkuJCWxkKP4Y0PiUj58/kDVzfJloenU
hYYjM4VQICfdYu7JQvUHSeE2/kXgZP7zxGcXFmaSbJX6fhZBa35jqfEeFsaO
BEu0i9+CO+5OjH49FpKzD401WfPBI3lb5yUtFu4001con+CDagPFX1eZhbdu
SwSkRJZAPPl7+VkJFhbtLxY+KygFn+G4zQoTTNzVKxOf9vAu0FyeEAeKmSgj
ZF+be78MxuIKhxazmdjKe+9J3/AAsuuuheWnMvGfezLq9y89AEkVh4avEUx8
bMF3KXUsh5mBL9uTjjLxYkRV/mXtSrgl0Ttm4MREef2VR9KzKsHNuC5q2IaJ
w+1jtZMKD6EjPaaZbsbEVzNfR9xkq+D+QQ2rl2QmRjfE6Rfo1IBXjNh04EYm
dlZIT6WW1YB6zXS8ijQTC9qkNshsrYXEDY86/hRm4tztKxUvDj8Cv16bAxJD
DDTfaUQOFtQB0zbi0M5MBnb7qcj3xtVDn1Thh41/MTC7zEfEebweQlqfeU9e
Y2DUi4jTAeZPocVMNCz+PAPXd8fCiRUN4M4KL+h2ZOCQZ4MZLaERxKbz9Iv2
MzDGUyRz7Ecj3L3d8PDMfxjoIhXMdnd7BgvqK5sVjRi42pm8VGfwDySvvzTl
tpGBIh23wpuEBGDw4u8gljQDN4l97HEMEsC7yHoh0d8YaNa4ftv4tACoJGGZ
4jk6zmmEjkqPNUHj5xDeVC8dpW8klAZMtcBs84XQc6l0vBDZr8J/8BLSIzLF
LOPp+CXVsDtLqB1MTB8nKUfSMS1zp2G7VTvEVi/mPwmk46FMTtnSVDtoFwc3
rbKlY9uAmI8w0Qmt7unWvbvpmNg0csg1pRP8VWv7b5nT8doah2D16U7AlPnP
lhw69verBw3md4HdlbPSybJ01G8rOfFMvRuWtt5MPyJBxxDSyai68G7IW6zS
5IrQMeX7n8Em490w7f+T2/eVhr3ytiVzla8h8nCQo2oXDU84U5KeH+2FKuJ0
Pj+RhuQ7ru1FcgPwjv97cUsUDcO0TiskZA2AqEINfyKEhr6GPfvuUwZh38xy
GdWbhpOUl/6Pt7+FiZyoev4uGh67LNI+0foOpNZSn7WY0DChUTr2vuIQbD7b
KpjY/Mu/PZry4PgQXNkn3U7VoeHt8iuMCxLDoLoi4y1/JQ2/ea8QzXQZgWuD
F57d+K6Pt/f1Hat9OAJ9FU9f9L7Xx3N1e603S43CqWOW/fb1+qhOPp3hIhiF
gucuP+3P6eMtEa8fIzs+gHhMBNNhUg/dmTOsV/GfwP5wi8HNN3oo77Vl2yqh
cSgwXG/SJ9DD924bE0f8xgEmbu5xKNDDFeP+5DsH/wU/y9KTDs56uOqAT7Wa
yST0rHtV6NC+CXVnrNojyqZBc0zhzs26TUjLu35Xd24a/NCpoq9kE9YJ+TLa
ts7Ab75jDQ7Rm9BWzdROtWsGtnTMDzmYbkK+jx/fQOS/kJ+srniwnIqm61fE
9qR9AyOXBNemPCo6/Hv86sfJb9ChSyrcnExFsqf1/UViFkhPB+i/n6JivKKB
vcX4LDjMpG5/RaOimSJnMNfiB6zdve6UFV8X+aY699KM5yFP4cLDx2m62NH/
pHVnzjwYvp9Y3BSji5mi0qV/iC6AR3BTpLiXLnbqhSuFdi5A/a3wTIG2Ljb+
Zb76XfASnF61IDDNpaCkYN72gKgQId7pta4skYLftZrvWZgIEbmZvfvVwyj4
xFdm7fgFIeIlu/ItyZWCP4m3mtw5IYLi7vftkTIF872Xt+r8FCbe4pgq7+Yf
6JRbX52gIELsOPsqkJqgg192n8xqm1xDvC2wuM+7qINDgv40cQsx4nTno4lt
J3Xwu3r/BfN8MSKPWuB6yEIHxWMlPCpdfiOE3p7eFSukg68xw7F6RJyoNv1d
ZdpXG6m7HtW9lJAk9vpctV9w1salrO6oB6aSxFg6KXn1bm3U+CNJlnxWkpCf
HVutRtFGG6vqPbljkoR/UdWXvcNa2OJNF9nWsp7YJHHwWdk+LWy/PGOUUSpN
NGxuIyGhhfbHlVUvTkoTjkdNDVv0tFBuj9jeWaoMEV2ne3dUTAvv2oxPFJTI
EB98F27IPtXEJoO8YtUKWSK7O+NkIFMTK6Ickz6NyBNS2e9kDGU0UHWxoR/L
FYnw0X9U0oQ1MOWx75tSUSXih84dyvw0GVXIRvk8OyXi7b3zRM0LMp66+Gqj
6qISwX+64YRhBBkrgiZYW3erEGYf9z81nFPHsnVezp9E1YggPYGv0Ts13MU+
31pF0iD+9bsbnN6qhrPzT1nDDA3CqTIlYqFWDa9+aVY4cESDMCOOZtTeUENT
zptjKs0ahNS+FQIjazUUn7Qtod3UJG4HGKsaP1NFxbAIyzXm2kTtmcMZ5+xU
0Ec6WKKrnUJwPoXr3+SqYNa2lLbG1brEXbuiJw/lVHDJzfLOJOgSedzJ99+6
lDGGVvR8oFSXiPl2Ws9nrzLqFv/5gRZHJRx8o+vcdyohg+gha9vrET887g1Z
Gm1E0pzn5kVROsGyW9ZUVZXHFMVHmkFjLOJOFPXvoAU5FLb6NMEXYxOUGnvl
9h45/NI6bDJKZROqyg/kwhLksM3ZeNbWl01IjHqsGhWWQyo5oYqYYxMuDc8W
4z1kccEz0lsulkP8DyZk1vQ=
      "]], LineBox[CompressedData["
1:eJwVV3c81m8XLjLKFpmVlZVsHuP5fu/jWR57/pBQIaOszIoiCSErIqSSkYaV
rBKREVLISgMJKVtRxNv7z33+uM/nXOe6Pufc59zizr6WJxi2bdvW9O/4vzU7
eqdU34sfNjxjffckakKT2mlePWtRuDLYEsnEqgyPLOpiPEJEYezT99ZXb5Ug
05fxb1KWKEQS539UpyiB74P0qU+josBWTHx2gE8JRCXrnoV574XbR6t5nUQU
IYSX0b0meh+wmKl/+aGmANfPdHzMcBAD9dMe+3VTZSGBxTfzoI8YrG7W1hrY
y0Lk9d1WDeFi0DdAjM6RkAXvSof2yTwx0BYxjuSulAHKwlyFxjcxCBW3+4W9
l4ZF992xfUHiILldLnuH+gEwtnVQ5UqSgBO0vgy7/RKwtjRQEnBLApSKDKdr
l8UhP9Hi4FCpBLgWzRg6tYvDRgtN6s5bCeiXWsrx8xeHh+oqe9R4JSHWdNK9
/pUYsPEy/7FJlwTW4VuxDLv2Q9WjiOCnBZJwW01EWP3pPnA2WF/aXyUJMfE7
R3947YO6iIXv0wOSIM0m1r/csxdOzr//eE5QChLTv5H/yxOFjq7SF7nZUnBz
7jSbkYMwBHvI44wPpcBgQtzqC78wSOwoqHN/JgV7um9kbXsrBOd0sx4rf5QC
x5kRzVdUIZC7H1XQtO8ASD0Z8o8nCEJszOErk3cOQFdxiVSq2h7QJzFaKN6T
huFAeap4PC8shZ0Z+lkrDX3Ogp/FzXkht3r2aH2nNHQ3yr0t4+eFFYUhH+N5
adia55MPyeOBPIFHCSc1ZeDQx5ST15q4YeOHTXvhSxmgceYUj2txQpFMl5nP
gAxsauckc7zjAEtnvUGNaRlQWh1lRX4cUDx4cPIlmyzESwlXlT5gB5umbTu+
WMqC/QHuxzcV2aA84z7aPyYLyXEuFpYurODQu79tckkWjgwKxipysgIrR7pp
yQ45MDt+OXCtlgWcIsMdMVk5uFW88ceUjwXYva1Dj/jKgZZ5jPVwHxO4kTar
Mv7KQZzDiZmVMEbgOR+AH+WSB2py9Oy0BiM8q55ukRaX/2e1AsrmGWD3ob53
TyjyIFrR5vH4BAM0Ctxb6ouXh4SvwY/sj2wHkVkLRW7hgzDzwDfp7OAmClO/
GXJP/iBs5xZi3XlyE30KnW4E3YOQRnUyHvn7F+XtCrc67XAQhvkycjG5v0hW
9uGZ3tyDYK3jFV2auI7UXZib0yQVINNh+sJmyhq6ft+C/ZC6AkS85/oRTlhD
q4s5/7VQFGBf/rMw4U+rqC5CbfrnCQUIN9T7kqy4iiD3GIftPQUo3zFOIn74
iUyG62yFDh2CTtgMOe6xjErEmO+UY4cgWGV1yGDfMuL2sJgxMD0ERgm/ZiX7
l9C7X1Nh53wPgbijSu1d6hKy5+PPGyk/BDPsvySSVRaRm5nvj5uaisB2M4FT
1W0OtV+v09DUVwQrnQhfjrlZJPeJKbzbVhHSzfPxSyGz6IdXDs/WGcV/+iW8
VUj6gfzjXmkee6oIcuSYya23Myi8RfLiv26DUy7n+TezptDoA8/+vZZKQDRV
DIxWnUKQWion5KoEl95l3MvrnEQMR3V7uWKVYPPBw9eRDJMoes1S8u8bJfjI
IP3xcOQEmvqUGbI2pgSeKR4hawcmEL3lU+fyshKMdO47saPzC2Iy0ND5yaYM
cTObdRZCX1Ab/4vx70rKMBKsz05uHUNrrBMJ37SU4ZtOWFVX4BiS3WAmTOkp
w5l5r/pbUmPoyrhx/LiVMrhfuV/EHTuKjEqH1IZDlGEtdFDc7Okn9Ia+ENXa
oAy+ZL8PShHv0TbibqWX7cqg4zjJmcTwHikraQ6/6FGGiGpGk20xwyiZP+xQ
/Rdl0HZ5dmY9fQhZjrMMPGZRAePy9KK4zgEU2S8fUc6tAnyKX1pLHQfQ43YT
+VIhFZjhucxQstiP+EqvXbh/UAXGTZiahff3o4HQ/TJ3zFRAtW+v2kZiH2L2
JfXk2qnAr4ays8pKfYjgfCI057gKBN8Zv7+zpxdl0h+8yQhQga8l9rypQr3I
np9wJjFDBapPWnVY1L9Fn0pMX4V+VgHGkEvTf9K6kNgerXizaRUgZZP+CrF0
IZfz4iaSiyrQGxnh9CS0E00brbztYFAF0lSNo45XB1qavjEkJK0K3+3bKEGe
7Ujd/FLWrKIqbM3xfvCea0Mh1V4OLwiqkDT1KzAzqA1tXEajHgaqIHI6qexY
XCtikvw6Ve2lCjts9tzq7nqJ6HHdxfFBqkA8Vd/u7vwSxS1Wnzp6QRXCjnL2
z/9uRpyNcfPMyapw8HYGxyPFZiToqLz632NVUEMrO5lKXiCFjFDmld+qoJRV
LJ+0Xo98Nl3b2xjU4GyyfHW+Yz0qP2Eal82mBkFe0SMVTc+Qpro4J3mvGug6
/sSj058i6GnlTwU1+OJxOLvMoRZFapUNnjBQg9Ra3k7l/hrUcuvGDW1LNVj8
udJEN69Bhj5ee8dc1GDFn/kjr2k1smbjPaAcowZmYgmJH9yeoOv+65OMyWrw
TsO+aHKpEg0PT9wbzFSDAaXdtqoXK5HTvWqF8PtqwDVZYOuW/xh5UB3Vu1+r
QZuMvbryjgoUGn6P7MWnDo3XX8eEkUqQ4GyY2z1RdcjtMOmQKXiEquwtrkxI
qUNUAGdi665HaEnjT7eDhjrc3uaR8eDTA+Txw8jexEYdfLVectQWFSNme7Hz
V5zUwZOv1DFfrBjdbVu51eKmDg7AsiCecw99yrv5FQv5F+9dV05hVhGyPjzv
p5ipDjnHOHvzKgvQUmvztZO31SHRmrn6OxSgJPXMqsJ76sAzUFXp9yYfdXDp
beyrVYdrk5I/mZfvIr3W1Biu9+rwqtLil7VVHlJU08xdENGAxaDd/30fzUVd
t3e9UJDSgCM/fioRtXKRJ+fnLx4KGpDdXfJ5MvUmyv8WIzdG1IA3jlnFbJY5
SPj2cGWPowbw+0bozv28gWo4SgY53DQgTZRMdne7gf4Ljfxj4KMBWqXZZi+H
M1GyzUFouqABh05XMK20ZyAWjvOdFbc04CLzjF5tWzrKP2cxN1ekAeWhefKj
JumINH2A52CZBmCHEiYuDaShC83dNncbNaCX+kKZd/4aWjkrNn5tTANipZcY
WImpaHSyeS1QUhNyHgaTukIS0d+7/HecFTThRtDjyrd1V5HwcXcDcw1N4Mjx
XtrPcBX9N7Ir66C+JiS9kWAi34xHHW8sdMdPasKuKIVdKoxX0FTC3S9vAjRh
cmi72j63WLTD8Gd8fZgm2KKqmOKuGIReZn7I/LeXGbJrcRrnR6PKms/nzSo0
QcJ1na00NAr1BKlIY081gfZ5wfjs70toTvVSt/xLTUg8vH+76blLSO6R9H7m
AU3wnzK/3hcViXLveDc++60JuXVfEuKfRqBnTg0e9xkIcCS+Q+CLWQQaFuHh
yWQjgPiByQOJr8MR3/XK4wF7CbDuyWDxi3ABXYlbZ5DXI8B1e44aaWooKtQ3
eSBgSIChE0a1GdfOoZc7blkxWRFA4ViekdHkWbR5gZQ/6koAV7NiDqHMMygw
4Ao1I5YAP61NvzfJB6MU5ZHZqBQCHJufr63JDEIlswrX/bMIoPziqLfuriD0
zf3tpMlDAjA1OzimrwYgJweB2B1vCWBUHcUW+Ps0ChXyVF4aIgBpr15c4cXT
KHOgbujzGAHOP5d362I/jfrMneSeLhP+vf9i3x8e9EN0akHHaQEtGIxOmxnd
7Y1OMKz6HxXTgnYf3uV3Zl4osoEuYiKnBbcCJhgfJZ9C9do/TsnqasEVMfEn
aWInkaqiGsdnJy3I0vR10Ah2R/cXffdouGtB/5J9ZeWoG5J88nB/vK8WHIX1
8KemboiPKK1KiNCCPGmNWi6NE+ingZBt0h0t4Dz3hvRU1gX5cNgc+1qsBVvH
LnceeeSMJt+meupWaAFHlMvNOXVnNGDLHjbVpAWTj0MfFBkfRzUntm6jCS1Y
mK1LomofRcpyxPvpP7QgvFG6QdTHCRX/OPP4+4oWzHC9dPlQ5IiyApZaMpi0
wfSzNX5XzgGFXfw6My+tDV2BWx+tXA6jFYrEClVJGzwd7vz0eWaHvFmP/s0m
aMPA318MuUJ2yClpiItO1waG987aQ59tELrZqX7b81+8Nk1R3RvWqOYYK/7r
tDb4ToQd8OO2RspSVH3jc9rAd8oxgjneCok9eH54LU4b6IUu7cxxloihtvyC
+UNtcDyULKn7yBydC5uLKazUhmqvX8yOmDlaRgdTNp5pA8/Cqy9pt83QRGv+
3XuvtYGWsSh1ZcMEtb7LaN82rw3m2vXzk4uGCM9812Ozqg1nZ1tK7HQNUfUR
npGHW9rwkKVvwe2KAbo3Hjdrx60Dtr3Xs6ZV6ejKwnnechUdyGMsyUyuoSKG
yjoRFh0dYJ++9HVRkorOhaxKOZJ04Krvs8p91yjo5KYfYaeVDqhqc6HzYWRk
zO7qcDxQBzyH86U+nNFDA2T381fDdMD6t9uXcwx66HjoydzaKB2wq3TPFEwC
FDzjN8qT/s9ft0yMyxmhW+3nXZue6IBu4ZmE1INEJL/t4uW5eh3Ix6eDJ07q
okpCVKFwqw5IF7pVSZbqoPbCuGn/AR3Y4FHTWqBqo6WoDC/JVR2Q4rr4PaVY
E4U9y7pqtvWPT48MozCHJmJZuVkSyqILymc1Zh8GaiBRl/yFPgFduFVQtD3R
TB1R9coDo7R04a3RLc4bKqro7ZnK9DLQBddBDpM3FSrIvqy66gNdF7pVXmZZ
E1SQz/7na+qHdSFgyfjmmoEyyvzbEfb1rC4Y2rlNzUofQhIa3Td5InWB0Poj
5uthBfTIq+c5FqcL5lW9zympB1HTyOC261m6wJ7IfL2UVx59r52Ioj3VBc5P
LP3ZpjIoeHGqwL9ZF6Y7rViUiqXRNrnvrbmdujDR35wvxyqN+DIXWVdHdKFm
R7z8l14phAdvJhRt6EJUoEyIb6YEan+0vaRvBxEGWjXZ9XZLIKuvO95ssROB
1fS5blGKOPKwZuOx20uEvLPbX/ZliqFUVcF0VpwIPO2izedy9iLRkyJV6jQi
RHpubF5oFUVFd/YNHjMlAv9tHgPLXyLoGfcBoVonIiD+o2FdbsLo65zKTc9w
IogtdNRxxwighaAKsn4sEXISTWNVXu9BfzZUZ6RSiKDD3ZA7KLgHcbKpE0bz
iLDexP99dyMfEkyt/Fj/gAjnysZXHET4kISQRlR2JRHGXOzGkkN3I00ZzR6b
ViIIZbKayhvyIiipClF/Q4QhhrJywxoeZKhB2Mc7RISr9/gqOuV5kBNZ69Tr
b0RoCwsI9hXlRtFHdZgoHBgUb/XHjTiyo+TJugfiezAQuPg85cxZNpTlrWu5
tQ+DY0Li2xhydqGSUOKtOmUMqF+IVI6frKiGoZ6aqY3BY2chpHCQFTVdwX4E
kTBgcHncd9qdBQ1m4Noq1hiYXRwfqV1kQuP7Gj5zOmKQPKLK5IqY0I8CFP3j
BAZLRpcko1J3oG2V0FcUgsFtc9ulSDojkn1L8t6XjcFUd3cNaX4bUrVt3r1x
FwMXqQffj7huQ8RP5Lrhhxj0+3g+uPh0Czf/QWFJf46B35sns4O1f3H7gJZH
/m0YkMqpolMvN3DXP1Rr87cYXP8vQuza4Dp+hlX/Dts4BplFqjbvef/gkUlt
+t9mMBhTUd9g0v2NJ+yhz7UuY7DIymc477mG35Yy0I1kwmGRLrekMPILfwVG
/WuyOBTufkbfwbyCv2vrDB1QwUGNbs7S5LSMfzI1lqjUwWFH/rxM67MlfMnB
xNfXGAftiPC6zZhFfOPLa36T/3Dgv6/6ZGJlAWc+ZfpM3gmHvWJNvIFuC7jw
WbOdk7441HyKuLPxaA6X2va2tPkMDgc817e7P5jFFWPMbe5cxKF/08mAo/wH
Tkq3uOtw7V+8k1L17O9m8JPlVlhfFQ4vNyWUtf2n8Dd4A0WoAYezdpLvVqon
cfUueeOjbTg0+D/wpjNO4luT2498H8RhTi2ki/f+BO4a6O2sMoqD8h4ZHh2m
Cbxj+7BnyDQOn0gvdOxPfMHTRMvOMP7GYYxTQGJJbRz/XSwSYbAdgfHN52MS
eWO4EyEmJmkngrwC1bDnfGO4nKXTdRFhBIk6icsVzKP48xj2SjVdBEmcpT12
6h9wSf4zT8+SEfBuf2+SYj6Cx+Z9aWow+vetPfxnpCHgPW5VX9dj5IBg7cIh
K8XuIbzGUHo4xRUBmeVU+E6mIXzfUMrooNe/Nd0kVImHNIhPL3nMu5xHYMt+
n/HH637cJOLdr+LLCDD5bSdPiPbjFRywOX8VQXi6XKut3zs8TFaAIywXwdmd
XPe3y/bhPE4t8mkNCNJ0S80le9/iwd+VVd+3ITgjQmrjo7/FP5zJ0RZ7i8C3
BKnmRb3BC68F0B+OIujre6RvGv0aZxP/bLY0jUBWcpbOeK0L9ysxtNVaRCDk
zsZkUdSJ35zgVhvfBsBxxeL866+vcPMHrZpMTABdtwPex3O9whn8w3RkdwLQ
fKxFGaAd99ia0vPhAZA/bnNAv7IVVxVuMP8jDhB3q0b3w0QzPjEaaL1XGuBo
fKDvKt6MZxTJ24E8gOyg/1WL3CZ8Q/360WhVgKaAJav9Xi/w0nUjl2JNgBr1
Q86U9424c9N29y4dgAOfn/GxmTTibWbePrxkgIC0+7bD4c/xc3sk/TX0AVJF
Djy/FF6PK3wcCrIzAnii9CfWPuYZnnqScj7XCqCsWKoxoaQOd7gskiDvCsBd
XF/pYV2Ndy8nWRZ6APwMsMuLuVCF6znvEJLwBtgnb7EuUPYEl0azBULBABFv
wtauylbimY+Oe6WfA6hKCzL+7fMYZxMdUOUJBzARRYZjTyvwhbXnDayxADEq
O7bTPcpxZ3e16KgEAMNt3gVH2srw/v4i420pAM3Dmo/4Fcrwuork4dUbAF/f
dvMFsJXgl7yclycfADjLzr28+K0Y//V+oNa5DMC4dIZ5bfUe7mFgFPGpEuCX
z4cjG5z3cGNpdY6B+n963R4rifqvEH+edq/PogmgvWwz5WxUAa7CuDfrdStA
fmit3Ke6fHzPKJNMyxuArN9RDYvEu3is6blZeAcwWKD8WjI2D19/Nvf42RCA
owhLfOfwHXz0xiBUjgGoC/Rey0y6jd+3Kra/uwzwnHDMrvxCDi7atFd8/xrA
rE1cxGO/bDxJOXUqawOAawHz9PPKwgM5QgNTmfTgO0NaWWN4Jj4ZOq/DuUsP
ItPvBpZcz8APz7hsj+PUA9pxq2tsVddxvM048aKAHmRmGNZPsqfjZRovrP+K
6IHxoZnMd+Q0XDJfQ+SsmB6saf+k8ERew1kv7rvnJ6cH/2X3bfjtTsV7dRZe
HNXVA5c/zDvVmZNwSrFr7AjSA8mHo9ahI1fxaoFhU1uKHhSPZl978jQBz1l5
MWJqogfBxIaXwdlxOKeLZl6HhR6sTsjKQdYV/GLPfQ+ajR4ofbGWv5gXi7uV
XPuJHdWDU9Flqzzd0fiQKOuzWhc9+Ov5TaF+4TJuFB8WqeGhB/4Tf25eF7mM
K3uc4Dp0Wg82prfnFMdewn+LE+REL+lBAnuxdGVNBB7YkbgeGaMH8YUEfm7B
CHzBf/L1t3g9EOlstsr6cwGfbE73r07Tg0odaWOF8jDc2WuWsu+GHnzzW7pz
JicU/8hHFbh8Uw+S1z/zLqScw9+dWHlqWagH3RVtG3M3zuDmnMaJtff/6fPC
tKvlQQjeWXX3mFipHkytaR5yaw3Gm1ismOaq9SB76adMM18QXlZcbnrllR78
+Ljs1MzhjytY7hRfeK0HZ+PPCBQ5nsaL/hxbtunVA8s/AvkClX54rhF3ptSI
HozdT77nMOWDC6+4n4z/rAdJakKZTTXeeHpOA3Hpix7EbHESgtK98IRZn7GG
H3rQtVSoud/3JM56vfWx9KIehLOd3292yhO/hO+LvvpTD9Ia+2OIpz3wc0mv
5Y9s/qsP0ljeZKYb7qGiEPiLiwRvPxY9p5m64BPDl2iOfCQof88FQknO+NHI
EcGXgiTYLLrMcmDwOG7TF1efIk6CppAp8/ehx/De0PGktQMkwDhmM5nKjuIm
UjrOR+VJwNUr8ehloBNOCfrGfEiNBDVNnlF14g5441694WsEEnRNK7nx7jyC
67ZmPvijS4IAi3Fb4fXDuKoA3bydQgKH1by4or+2+P7awhsuNiQYPsHx8qy/
NZ51fPNUhz0JtHepWvzOt8L37LLBVY6SIJd7+9sjny1x9iNMXzbdSZB1kXHp
5kkLPJbR8ckJLxK8mmG5MldnjjM+rIzp8iPBo36ZdkZec/zPhotC1lkSCLbs
3LVSaIIHFzzd3HaBBBmNxkkN54zxRZPdPe6RpH/zrU9Cxt4In85tCtKIJ4GU
3t0GDh0DfADEG97m/ONXszU150/Fw73mXny/TYJb7seF8wspuGzm05fMBf/y
Ffgd3z5Gxs/N/9dBfESCDw/8Viy9SbikiORr23ISFL4vvK5Vr4d30Rbe+D8h
QdK+9cKE3Xr4vty4/nv1JGAaijmmWIDwtle2Q80vSHB4ZOrSsyAc9/spNfKp
5Z9eX97d9rTA8CbjhlG+bhK0fLuRnSCri7utL3+P+ESCc1xHWIqNCDiXzIu5
7HESGEWHzbSd1MRrLBMXqyZJYMydcEYtVQPfdV929cccCTx/zjY2rqnhj/t/
/mZZJkH4DBvBgqCGO2xv3pBYJYHkoUN32M6r4iV2jgyHt0iwER8ouiqqgttG
yTMFMpL/zUedI/eDlfFtZassSSxk0BS0vCjwSAm3ZEnlaOEiA8P+u1ozZofw
X09aBVXEyOCLCmjyAnL4rbFrIsZSZOBR8Z+qE5fF6RzH97nLkiFrmO/JOQ0Z
PMt1XfKmMhmoO7oaVUMO4OTkdukadTK4XXzPEpsvhf94mi7Xp0WG3A99tq3D
kji+W1lppx4ZBO+/h0F7CXwK/6siRSXDD1udHXsLxfHkkx3qyIAMU4+Jv1TW
xPDxF646QRZk6OhN804/uh+P9rtBHTtOhuPOWkOhXcK4Uo4bfeMEGT409xtP
NAnhQ21qRgInySDr8XX+aLMgLr+/29zEnwyuSIbCP7YH7zPMtvIIJkO/UG7L
jb/8eFiwh82lc2RICyUNtUrw492vGRxqI8lw9MArz77Lu/GQ32+c3kWT4edG
wKM9zby42IGbx+fjyCBjKjvwioUX9w8juB+49o+fUs/zE4XcuMBBL/+Uu2So
eJSWdc2ZHY/YXCUw3SPDa13HYE5FNny659LfMw/JcE6qX+Y48y687kx27LEn
ZOjO4DQKHWHBJY1lTN/VkiFvt3QkbZAZT9j/eDf9+T/8YeXyhY9MuFNrR65S
Gxl23Dy2c/+uHXjbDRvXu51kOJTgvtSlyIgre4/LCbwlg3JD7e+HDgz4dr4/
lZtDZPAOjYqJ6t2G5x+X63w9Q4baXw+i+7U3MA6NJ8l682So6T2h3MmwjgWz
6tk8WSbDSfanDl+GfmP0UruxnA0yDD29bmN9fxUrj5wo5N5Ogfp58atF+b8w
YRs/rygmCghOeN3juf8T+74Rs3qKkwLhPaFPbd8tY9Zvd9d/5qVAgFYdn83a
Evbs7q1IKwEK5J0QqSo9sIQlGlZz6IpRQDEm+OK3rAVMNXNScpcqBfxf68cz
d37Hsk/5fzuvSYEXu8QyU9NmsB1os2RRhwLf1nLPnjz1DRv4yq8zTKaAthTf
eBs+haHaO1vGdApEnk5eBJ1J7F7CoZZGYwosF0v7/YCv2Fk1qvm9/ygQJ8wd
seH9BRtn7uEXtacA+UYp4cK1cczwvcNIkhMF1ub/Ur2axjDRi4FuIe4UeDqd
EvZbZxS7bL1N4fupf3j+jAcrWD5jczIJi05+//IPXBEzKv6INXbfDaOdpQBc
dAk/JjSCyeUpkerOU4D1s/yNG5PDWGrQUxbFSArE+lrpH3gxhLmK9qXyx1PA
Ojia+DN7AHs972R3JYkC60JLI7LZ/Zhm88zev9coEHJDiXK14B3GcpKheCKH
AoM6xFzG972YH5boY3eHAq4XXVuVGHuxIW5h9a4CCsSYnqlr1OjB7lerNDwu
oYD8D33dxZNvsN3x9VEyjylwfl2C9RljNxbmZGCYXU2BhavT1w0edmGmTMf7
IxspoCCXYfNXrgObOOLcef8lBao/rAR48rzCQitcXvS2UyB79Fbj8R3t2L2j
bo8keiiAH45c28vWiuFV7ncN+ykQv9rDtX1fC9bP7nnDf5gCTgWRliU6LzGG
ulOXm8YoMCvdK9Sf1IRlcnuHznz9Vz+CPt5JbS8wJXef07wzFBgiROims7zA
HPhOOzovUeC3Z3CJPd6APfEJ1mBgpMLvCYmBT/p1mHFLyEF5Fir86cpSzpCv
xcZFzopbslHhSoeij5pQDcb5KpQjbzcVDuRZIHnBKix//3nGDgEq+Dcsh2TJ
PMF0gy/8XhShgq0NR6iQXiXmIXnxq54UFaQfkIh3kiuwzbORI56yVMgnLkp8
aSnH0t9e6klRoEKJde/bAsZyrOl8dP2YOhW+t7z/kqZYiokOxadfpFIhpqfs
I1HhPlaheDW+2IAKuRqDS+XsxZjB5cSLPSZU4HqdHmbwuwgLVk3xFrehQl75
xPrYSgHGfiXVxcCeCjqp6h8XGAqwvM/XDp92ooKoXdEdTCQfe5NwnfrCjQo3
t89zjXnkYW5fMnS/naRCrVh158mbd7AN7RsqPL5U2Gzk1sh8fxuTncreezyE
Cs37d7uNvc/FIvXu/NwWSwWD7y42XYM3MMHMvO+yCVTw5JE9db4mEyuduztm
nkwFRYXbbYEFGdiH7MLXtzOpYM9j+/tgXjrmv1TU3J5DhaoHjttXytKwnQbF
tQu3qRB9V4PO23EN0/z1oACKqcDTnGqQKZSKdRk/yvZ49E+/JrNqRbMUzOVu
SUpyORV2VR7zOnM1GUs2Lz8/WksFVkcjVWdqIiZdVBHA+pwKpHDLlk+LCdiz
v489lZuo8OHJ9cTNh/HYt/tV/0V0/D+/nL8VxlewWN1s22vdVOBvC/C+oRGL
yXaFHy7s/Yc3+IjBRj4Gc5ulO3a9p8JbtgvWjhqXMeYLh45+/kSFx9s77tUZ
RmEFnLzHl8ap8IDF8xvvyUvYhNKIq+B3Ksx+2r6Ho+UiFtXY4HZwngovW7aT
J7ciMEmLfA98mQq6R/wvy5IjMGd/by/XdSrsX/1sydR8HmNgtPQJ2aKCcJhc
21hIGHbnmqZfHCMNPti5qnzTCcVGK7cCythocGJ2R5HotzNYBHUiqJmLBhYq
y4LyfSHY/oH2kIHdNDg8jr+WehWMOa2mhG6I0MDSP7zjy0Ag9jcm+DyXGA18
ij+IVc0GYDmCR8IlpGjAUyLgnsIZgI1oS12iK9DgNV+nZqXXaexcB+vlI8o0
uLFvNVup2A8TPjIb7aNOg6RNqQzND76YXVhVXBqRBg27ubvL9ntja+zZCUVA
g1DLJbv1wVNYxs3wxDoKDfanh+gF5Z7EBp7TU0eNaVCb8X4h1coDCzY7lLZs
ToMrn7di+PTcMf5RnuvM/9HgNN+9jAgdN8x6+8gNBcd/+CaXzfnMXLHllIZs
dJwGH89Uxeh7umCpEvk3LU/QIGOdbTz0qjPWQ/a+c8abBkHug0UaS8cwv3cW
d+NP06Cgvpk6q3IM4z6hWZAbRION174CfCtOmGn01r2X52kgcz+PhY3igM3t
mbg/eJEGnUMyvD4MR7CrRe0PZy7TYI/NlT2T3YexrvaUMu5EGhj8vSVQkmSL
eR0OrpBMpcHx812d7yNtMLYZ+0rN6zSgCwse7b/4H2bIJlXjkEsDowdaB5Tu
WGEz2ax1vnk0KNQwvXij0RK7ojD7NLKQBiKiSVlT3yywdpOqhnslNBhvY7oV
ZmeOeXzKevG0ggaefFOPv2ubYSy+4c3dVTTY/ZVrn0+fCUZLpretPKfB4rkK
DQMNI+yr2KFXLM00aE0XO0ffMMCiynk6hdtooCnmoiPVQ8eae993wxsaFHFz
dbPn0TAJtgvXHvbRoK/5RadhDBWLJIvbCQ7RQMMhP1LiHAWDSvex+VEa9BR4
MuyOJmG3f+wqPPKVBgn54blrN/WwLamSk23faHAopuQb9wvAnqevLOcu0YAc
vLxy3gTH9nZn1OxapYG+brp6yVsiFsasez54nQbL1W38xm66mG7IRWbTHfog
1sJWYtuihWWVSnXWsurD1pOtZomrBOzPVFvSAQ59KHwaRuV31cRq7DiF/vLr
Q39bmOo1ojomkFL+0UNYH+4xUY61ENWw4FfWee/26cPzTxWPTxmoYho62Qcf
yuhDD+E3teayMpbmjy8IKOhD2JLPr0seStjK/bHKS8r6cKJnSYP9/SGsQkQW
P6KtD72TbooZv+QxHutOhjZMH6Y+vlFquSWH+SX4tKmS9CGGVB5Rf1gWU/pb
ab7LSB/G/mvgGN44gCVq2PEHm+lDXOnfs+cmpLA57/XhMSt9aFvlLR0blsQe
ftJzqXXQh8kQv1an7+IYm8BXmQPH9UFqhNWQwCyOnTSL/ZF8Qh+ctLYL2yuI
YXKN3UEePvqgyLCroUh5Lxa7dlrnnb8+bLufPGJUJ4JNK/NvoRB9uPEqoNrX
RhgrvHMkViBCH1ReLPwpbBLAmN5vGl+K0oezgrfKOFL2YK68eTzzsfrAmk9/
dsOHH5O8NJ3VmqIPc+2c0hrWu7HIp/FHVa/rQ4fezbgJe15sfFlRKjdLHxxa
vp5d8+bBbrsGPQq6qw8Clnf53nhzYVs5gv5jRfpgEpfwjDzIgTn1P9U0eagP
6JLc6IY1O7aXxtAo9UQfDFWy6o2v7MTCLhREJdfqA3uUU/9OnBX7UEU32Kj/
59/CsWnDyIJlyST19rXqg0T7eS/3Zzuw30dVM1CnPkQnn0kuLGHE7DL7jzx4
ow+hhu2JXiUMmMBO0a+RQ//4TuX4Tfdtw4L1GornPujDu3sds40LW8SBs84+
9mP60Lh0qrjFbJOYNnNvVWVGHw6LDNjWGq0TS46/Hzu9pA+zMjplyw1rxLYh
tq7yP/pw0Ow+geD3izhqhlUtMtBhJWXhNqftCvFPq89tFTY69G1ZzV/0XSLy
4bfjTu+mQ16RrTPbkwWi4pOewHIROkTt3ywT1p8j0hUYjy5K0uFnRb9Mqs93
4vG76gYqCnRozOzNejg8TTwn7KZ2Wp0O7qEBrITISWJaSsbeciIdeoKiVq46
TxBLWF+xLFLoYPC0JDs5aJzYHv5nUdmEDiopS7T0qlHi+K+DH/z+o0O/FsW4
nvSJuO7t2FrmSIf421IaUq4jRL6viWULJ+iASizqHDuGiIoOjVnKPnR4KHJq
mM13gOhsKOlbdoEOGd/s78o69hLTtaLJykl0WMtutYli7ya2S38TKLtFBwlR
/gbL1HbiBp/xD6UyOrz+3hzAwP+SeOWt65hZJR0mmPtf1wg0E/cknB/wraHD
3zBCSpN0E1GJsbSxtJEOZlMdkmfdG4nOizzpSj10GH57yVnsVR1x/qF8nFk/
Hfa75i+mBNUSwzzI4b7DdKgrnKu+pVpDvP450LN07J/+/okKriNPiK9eD2JK
S3Rg/JqV4tlXTtyjUvqz6Bcdxr5/1q/5WEZ0Tot+JLZOB1aWxgqVmVLihr3G
Xt4dBlCk/0LmcfJDouJ06sYKvwH8Cqxjv/K5kJjGYPq0TtsA6JkP78zQbhKd
CC+1aBcNQMDKvIK7O4b4ICt74fllA1j1TR3ruRBNXPvrf48QZwDciomO3XqX
iSkvxQXlrhlAgZW0UfafSOJLi/BVtgIDWA84/cAbv0CU89Kp6mk3gEav/pcH
5AOIK7fL1By5DeGahdWFO1ediD4xf0Xi+AxBVNbBInrJgTjtbbijWtAQJn7o
sHZ4HSF+1Jl4xy1uCJUMdS8EbtoRW98JBL9UMYS5el0Djx4rYiZreM1BK0M4
/Dp+5kSRAZHoZ4L9STcE+8eMo2/sNYiX0AwtQ8QIjpk94xQeYCdaHFuyTBM3
BtVMuyvU8FrdPafzOZswExhwcD1jd9tBF5lUT63TTKE+bHX/ApVB10ko0M/N
zQzaTHsjmt/l6Hx6vLVmAObg4S4g/3qPhk5DY1D7ZLM5ZJaKFh4Q69XObmmc
z7a0gDph7dK4m87acsrPDgwOWgCpanWmcvCX1uDIvqEAe0tYiS7tsf0cpxUR
bjMuO20Jae05znv1ebVGYvF1Fy8ruOCVulz2IJeglX3oVIWPFXx/k9czxJVD
SHskOrLttBVkfZrwuvLwBsG490/dzSArsM2e1f0Ulk54JlJ9bvCCFUxxY04V
exIJuSVKfwxTrOCU/9X8XL/zBOd3Yr9VqqzgTYD/FPp1hPB8ksszosYKBivC
1xsTDhOEf28OdddZwcg2O199O1tC396PNacarKDuh7l4UZgVgeJ+40xBuxXY
9/exVEgZEaT/8KwJjlgBeeTPpwh9HUIk+3YP949W8CIosEp0i0D4tG9h8Mln
KxA5IvoZvmkQMsjd1ZYTVhAp+KpdhKJKYL0aF5IwawWk4MIp5WNyBNdbZ6fe
z/+7HzQZn5eTITSWe9jKLVnBbqErKT1SBwhnB2iE1l9WoD5xLvrYTXHCwLRG
Ed9vK7h00p/rzm4xguq6lIDLuhXwV0uwEez2EhI5+GLK/1pB6SWj2MdtwoSZ
/YyrW1tW8DGZMmHiJ0j4HxXS9As=
      "]]}}, {{}, {{{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0., 0}, {0.2, 12}]},
           
           ImageSizeCache->{{161.6568, 168.62166400000004`}, {
            178.92144721051304`, 260.2862897922282}}]},
         StatusArea[#, 12]& ,
         TagBoxNote->"12"],
        StyleBox["12", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[12, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.2, 0}, {0.4, 22}]},
           
           ImageSizeCache->{{167.421664, 174.38652800000006`}, {
            112.11741172575043`, 260.2862897922282}}]},
         StatusArea[#, 22]& ,
         TagBoxNote->"22"],
        StyleBox["22", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[22, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.4, 0}, {0.6000000000000001, 14}]},
           
           ImageSizeCache->{{173.186528, 180.15139200000004`}, {
            165.56064011356054`, 260.2862897922282}}]},
         StatusArea[#, 14]& ,
         TagBoxNote->"14"],
        StyleBox["14", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[14, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.6000000000000001, 0}, {0.8, 8}]},
           
           ImageSizeCache->{{178.951392, 185.91625600000006`}, {
            205.6430614044181, 260.2862897922282}}]},
         StatusArea[#, 8]& ,
         TagBoxNote->"8"],
        StyleBox["8", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[8, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.8, 0}, {1., 12}]},
           
           ImageSizeCache->{{184.71625600000002`, 191.68112000000005`}, {
            178.92144721051304`, 260.2862897922282}}]},
         StatusArea[#, 12]& ,
         TagBoxNote->"12"],
        StyleBox["12", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[12, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1., 0}, {1.2000000000000002`, 13}]},
           
           ImageSizeCache->{{190.48112, 197.44598400000007`}, {
            172.2410436620368, 260.2862897922282}}]},
         StatusArea[#, 13]& ,
         TagBoxNote->"13"],
        StyleBox["13", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[13, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.2000000000000002`, 0}, {1.4000000000000001`, 6}]},
           
           ImageSizeCache->{{196.24598400000002`, 203.21084800000006`}, {
            219.00386850137065`, 260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.4000000000000001`, 0}, {1.6, 12}]},
           
           ImageSizeCache->{{202.010848, 208.97571200000004`}, {
            178.92144721051304`, 260.2862897922282}}]},
         StatusArea[#, 12]& ,
         TagBoxNote->"12"],
        StyleBox["12", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[12, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.6, 0}, {1.8, 7}]},
           
           ImageSizeCache->{{207.775712, 214.74057600000006`}, {
            212.32346495289434`, 260.2862897922282}}]},
         StatusArea[#, 7]& ,
         TagBoxNote->"7"],
        StyleBox["7", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[7, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.8, 0}, {2., 8}]},
           
           ImageSizeCache->{{213.54057600000002`, 220.50544000000005`}, {
            205.6430614044181, 260.2862897922282}}]},
         StatusArea[#, 8]& ,
         TagBoxNote->"8"],
        StyleBox["8", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[8, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2., 0}, {2.2, 10}]},
           
           ImageSizeCache->{{219.30544, 226.27030400000007`}, {
            192.2822543074656, 260.2862897922282}}]},
         StatusArea[#, 10]& ,
         TagBoxNote->"10"],
        StyleBox["10", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[10, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.2, 0}, {2.4000000000000004`, 6}]},
           
           ImageSizeCache->{{225.07030400000002`, 232.03516800000006`}, {
            219.00386850137065`, 260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.4000000000000004`, 0}, {2.6, 5}]},
           
           ImageSizeCache->{{230.835168, 237.80003200000004`}, {
            225.6842720498469, 260.2862897922282}}]},
         StatusArea[#, 5]& ,
         TagBoxNote->"5"],
        StyleBox["5", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[5, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.6, 0}, {2.8000000000000003`, 5}]},
           
           ImageSizeCache->{{236.600032, 243.56489600000006`}, {
            225.6842720498469, 260.2862897922282}}]},
         StatusArea[#, 5]& ,
         TagBoxNote->"5"],
        StyleBox["5", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[5, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.8000000000000003`, 0}, {3., 9}]},
           
           ImageSizeCache->{{242.36489600000002`, 249.32976000000008`}, {
            198.96265785594184`, 260.2862897922282}}]},
         StatusArea[#, 9]& ,
         TagBoxNote->"9"],
        StyleBox["9", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[9, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3., 0}, {3.2, 9}]},
           
           ImageSizeCache->{{248.12976000000003`, 255.09462400000007`}, {
            198.96265785594184`, 260.2862897922282}}]},
         StatusArea[#, 9]& ,
         TagBoxNote->"9"],
        StyleBox["9", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[9, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.2, 0}, {3.4000000000000004`, 2}]},
           
           ImageSizeCache->{{253.89462400000002`, 260.85948800000006`}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.4000000000000004`, 0}, {3.6, 4}]},
           
           ImageSizeCache->{{259.659488, 266.624352}, {232.36467559832315`, 
            260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.6, 0}, {3.8000000000000003`, 6}]},
           
           ImageSizeCache->{{265.424352, 272.38921600000003`}, {
            219.00386850137065`, 260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.8000000000000003`, 0}, {4., 7}]},
           
           ImageSizeCache->{{271.18921600000004`, 278.15408}, {
            212.32346495289434`, 260.2862897922282}}]},
         StatusArea[#, 7]& ,
         TagBoxNote->"7"],
        StyleBox["7", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[7, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4., 0}, {4.2, 6}]},
           
           ImageSizeCache->{{276.95408000000003`, 283.918944}, {
            219.00386850137065`, 260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.2, 0}, {4.4, 4}]},
           
           ImageSizeCache->{{282.718944, 289.683808}, {232.36467559832315`, 
            260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.4, 0}, {4.6000000000000005`, 4}]},
           
           ImageSizeCache->{{288.483808, 295.44867200000004`}, {
            232.36467559832315`, 260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.6000000000000005`, 0}, {4.800000000000001, 6}]},
           
           ImageSizeCache->{{294.24867200000006`, 301.21353600000003`}, {
            219.00386850137065`, 260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.800000000000001, 0}, {5., 3}]},
           
           ImageSizeCache->{{300.01353600000004`, 306.9784}, {
            239.04507914679942`, 260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.2, 0}, {5.4, 7}]},
           
           ImageSizeCache->{{311.543264, 318.508128}, {212.32346495289434`, 
            260.2862897922282}}]},
         StatusArea[#, 7]& ,
         TagBoxNote->"7"],
        StyleBox["7", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[7, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.4, 0}, {5.6000000000000005`, 3}]},
           
           ImageSizeCache->{{317.308128, 324.272992}, {239.04507914679942`, 
            260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.6000000000000005`, 0}, {5.800000000000001, 4}]},
           
           ImageSizeCache->{{323.072992, 330.03785600000003`}, {
            232.36467559832315`, 260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.800000000000001, 0}, {6., 3}]},
           
           ImageSizeCache->{{328.83785600000004`, 335.80272}, {
            239.04507914679942`, 260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6., 0}, {6.2, 5}]},
           
           ImageSizeCache->{{334.60272000000003`, 341.567584}, {
            225.6842720498469, 260.2862897922282}}]},
         StatusArea[#, 5]& ,
         TagBoxNote->"5"],
        StyleBox["5", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[5, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.2, 0}, {6.4, 1}]},
           
           ImageSizeCache->{{340.367584, 347.33244800000006`}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.4, 0}, {6.6000000000000005`, 2}]},
           
           ImageSizeCache->{{346.13244800000007`, 353.09731200000004`}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.800000000000001, 0}, {7., 4}]},
           
           ImageSizeCache->{{357.66217600000004`, 364.62704}, {
            232.36467559832315`, 260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7., 0}, {7.2, 2}]},
           
           ImageSizeCache->{{363.42704000000003`, 370.391904}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.2, 0}, {7.4, 6}]},
           
           ImageSizeCache->{{369.191904, 376.156768}, {219.00386850137065`, 
            260.2862897922282}}]},
         StatusArea[#, 6]& ,
         TagBoxNote->"6"],
        StyleBox["6", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[6, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.4, 0}, {7.6000000000000005`, 3}]},
           
           ImageSizeCache->{{374.956768, 381.92163200000005`}, {
            239.04507914679942`, 260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.6000000000000005`, 0}, {7.800000000000001, 1}]},
           
           ImageSizeCache->{{380.72163200000006`, 387.68649600000003`}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.800000000000001, 0}, {8., 2}]},
           
           ImageSizeCache->{{386.48649600000005`, 393.45136}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8., 0}, {8.200000000000001, 5}]},
           
           ImageSizeCache->{{392.25136000000003`, 399.21622400000007`}, {
            225.6842720498469, 260.2862897922282}}]},
         StatusArea[#, 5]& ,
         TagBoxNote->"5"],
        StyleBox["5", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[5, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.200000000000001, 0}, {8.4, 13}]},
           ImageSizeCache->{{398.0162240000001, 404.98108800000006`}, {
            172.2410436620368, 260.2862897922282}}]},
         StatusArea[#, 13]& ,
         TagBoxNote->"13"],
        StyleBox["13", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[13, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.4, 0}, {8.6, 4}]},
           
           ImageSizeCache->{{403.78108800000007`, 410.74595200000005`}, {
            232.36467559832315`, 260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.6, 0}, {8.8, 2}]},
           
           ImageSizeCache->{{409.54595200000006`, 416.51081600000003`}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.8, 0}, {9., 1}]},
           
           ImageSizeCache->{{415.31081600000005`, 422.27568}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9., 0}, {9.200000000000001, 1}]},
           
           ImageSizeCache->{{421.07568000000003`, 428.040544}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.200000000000001, 0}, {9.4, 3}]},
           
           ImageSizeCache->{{426.840544, 433.805408}, {239.04507914679942`, 
            260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.4, 0}, {9.600000000000001, 3}]},
           
           ImageSizeCache->{{432.605408, 439.5702720000001}, {
            239.04507914679942`, 260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.600000000000001, 0}, {9.8, 1}]},
           
           ImageSizeCache->{{438.3702720000001, 445.3351360000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.8, 0}, {10., 2}]},
           
           ImageSizeCache->{{444.1351360000001, 451.1000000000001}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10., 0}, {10.200000000000001`, 1}]},
           
           ImageSizeCache->{{449.9000000000001, 456.86486400000007`}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.200000000000001`, 0}, {10.4, 4}]},
           
           ImageSizeCache->{{455.6648640000001, 462.62972800000006`}, {
            232.36467559832315`, 260.2862897922282}}]},
         StatusArea[#, 4]& ,
         TagBoxNote->"4"],
        StyleBox["4", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[4, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.4, 0}, {10.600000000000001`, 2}]},
           
           ImageSizeCache->{{461.42972800000007`, 468.39459200000005`}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.600000000000001`, 0}, {10.8, 1}]},
           
           ImageSizeCache->{{467.19459200000006`, 474.15945600000003`}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.8, 0}, {11., 2}]},
           
           ImageSizeCache->{{472.95945600000005`, 479.92432}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.200000000000001`, 0}, {11.4, 2}]},
           
           ImageSizeCache->{{484.489184, 491.454048}, {245.72548269527567`, 
            260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.4, 0}, {11.600000000000001`, 2}]},
           
           ImageSizeCache->{{490.254048, 497.2189120000001}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.600000000000001`, 0}, {11.8, 2}]},
           
           ImageSizeCache->{{496.0189120000001, 502.9837760000001}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.8, 0}, {12., 1}]},
           
           ImageSizeCache->{{501.7837760000001, 508.7486400000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12., 0}, {12.200000000000001`, 2}]},
           
           ImageSizeCache->{{507.5486400000001, 514.5135040000001}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.200000000000001`, 0}, {12.4, 1}]},
           ImageSizeCache->{{513.3135040000001, 520.2783680000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.600000000000001`, 0}, {12.8, 3}]},
           
           ImageSizeCache->{{524.8432320000001, 531.8080960000001}, {
            239.04507914679942`, 260.2862897922282}}]},
         StatusArea[#, 3]& ,
         TagBoxNote->"3"],
        StyleBox["3", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[3, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.8, 0}, {13., 1}]},
           
           ImageSizeCache->{{530.608096, 537.5729600000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13., 0}, {13.200000000000001`, 2}]},
           
           ImageSizeCache->{{536.37296, 543.3378240000002}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13.200000000000001`, 0}, {13.4, 1}]},
           
           ImageSizeCache->{{542.1378240000001, 549.1026880000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13.8, 0}, {14., 1}]},
           
           ImageSizeCache->{{559.4324160000001, 566.3972800000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14., 0}, {14.200000000000001`, 1}]},
           
           ImageSizeCache->{{565.1972800000001, 572.1621440000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14.200000000000001`, 0}, {14.4, 1}]},
           
           ImageSizeCache->{{570.9621440000001, 577.9270080000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{15.200000000000001`, 0}, {15.4, 1}]},
           
           ImageSizeCache->{{599.7864640000001, 606.7513280000002}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{15.4, 0}, {15.600000000000001`, 1}]},
           
           ImageSizeCache->{{605.5513280000001, 612.5161920000002}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16., 0}, {16.2, 1}]},
           
           ImageSizeCache->{{622.8459200000001, 629.8107840000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.8, 0}, {18., 1}]},
           
           ImageSizeCache->{{674.7296960000001, 681.6945600000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18., 0}, {18.2, 1}]},
           
           ImageSizeCache->{{680.4945600000001, 687.459424}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18.2, 0}, {18.400000000000002`, 1}]},
           
           ImageSizeCache->{{686.259424, 693.2242880000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18.400000000000002`, 0}, {18.6, 2}]},
           
           ImageSizeCache->{{692.0242880000001, 698.9891520000001}, {
            245.72548269527567`, 260.2862897922282}}]},
         StatusArea[#, 2]& ,
         TagBoxNote->"2"],
        StyleBox["2", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[2, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18.8, 0}, {19., 1}]},
           
           ImageSizeCache->{{703.554016, 710.5188800000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19., 0}, {19.200000000000003`, 1}]},
           
           ImageSizeCache->{{709.31888, 716.2837440000002}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19.400000000000002`, 0}, {19.6, 1}]},
           
           ImageSizeCache->{{720.8486080000001, 727.8134720000002}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19.8, 0}, {20., 1}]},
           
           ImageSizeCache->{{732.3783360000001, 739.3432000000001}, {
            252.40588624375195`, 260.2862897922282}}]},
         StatusArea[#, 1]& ,
         TagBoxNote->"1"],
        StyleBox["1", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[1, {
          GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  ImageSize->{751.6666666666669, Automatic},
  PlotRange->{{-5, 25}, {0, 80}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.503742769609375*^9, 3.503742877203125*^9, 3.503742964609375*^9, 
   3.503743336578125*^9, 3.503743821796875*^9, {3.503743863578125*^9, 
   3.50374395228125*^9}}]
}, Closed]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.503743353265625*^9, 3.503743356265625*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"h2", "=", 
  RowBox[{"Histogram", "[", 
   RowBox[{"sddiff", ",", 
    RowBox[{"{", 
     RowBox[{"0", ",", "30", ",", "0.3"}], "}"}], ",", 
    "\"\<ProbabilityDensity\>\""}], "]"}]}]], "Input",
 CellChangeTimes->{{3.503704801859375*^9, 3.503704805984375*^9}, {
   3.503714424328125*^9, 3.5037144796875*^9}, {3.503714531578125*^9, 
   3.503714533765625*^9}, {3.50371457590625*^9, 3.50371457625*^9}, {
   3.50371460746875*^9, 3.503714607875*^9}, {3.5037439918125*^9, 
   3.503743992609375*^9}, {3.503791998859375*^9, 3.50379200165625*^9}, 
   3.503805198984375*^9, {3.503805241390625*^9, 3.50380524409375*^9}, {
   3.503805298375*^9, 3.503805308921875*^9}, {3.5038055014375*^9, 
   3.503805507109375*^9}, {3.50380559146875*^9, 3.503805602515625*^9}, 
   3.503805688703125*^9, 3.50380701128125*^9, {3.503808729890625*^9, 
   3.503808738125*^9}, {3.503812604640625*^9, 3.503812606703125*^9}, {
   3.503822230171875*^9, 3.5038222303125*^9}, {3.50382236465625*^9, 
   3.50382236696875*^9}, {3.504220577265625*^9, 3.504220578484375*^9}, {
   3.504220839953125*^9, 3.504220841578125*^9}, {3.50425417078125*^9, 
   3.5042541788125*^9}, 3.50425428528125*^9, 3.504255386734375*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {{{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{2., 0}, {2.5, 0.0014154281670205238`}]},
          
          ImageSizeCache->{{54.687840000000044`, 66.39600000000004}, {
           178.80674083070403`, 185.5020024023535}}]},
        StatusArea[#, 0.0014154281670205238`]& ,
        TagBoxNote->"0.0014154281670205238"],
       StyleBox["0.0014154281670205238`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0014154281670205238`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{2.5, 0}, {3., 0.007077140835102618}]},
          
          ImageSizeCache->{{65.19600000000005, 76.90416000000006}, {
           156.82569454410617`, 185.5020024023535}}]},
        StatusArea[#, 0.007077140835102618]& ,
        TagBoxNote->"0.007077140835102618"],
       StyleBox["0.007077140835102618`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.007077140835102618, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{3., 0}, {3.5, 0.024062278839348902`}]},
          
          ImageSizeCache->{{75.70416000000006, 87.41232000000008}, {
           90.88255568431254, 185.5020024023535}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{3.5, 0}, {4., 0.0537862703467799}]},
          
          ImageSizeCache->{{86.21232000000006, 
           97.92048000000008}, {-24.51793732032627, 185.50200240235353`}}]},
        StatusArea[#, 0.0537862703467799]& ,
        TagBoxNote->"0.0537862703467799"],
       StyleBox["0.0537862703467799`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0537862703467799, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{4., 0}, {4.5, 0.07077140835102619}]},
          
          ImageSizeCache->{{96.72048000000008, 
           108.42864000000009`}, {-90.46107618011993, 185.5020024023535}}]},
        StatusArea[#, 0.07077140835102619]& ,
        TagBoxNote->"0.07077140835102619"],
       StyleBox["0.07077140835102619`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.07077140835102619, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{4.5, 0}, {5., 0.056617126680820945`}]},
          
          ImageSizeCache->{{107.22864000000007`, 
           118.9368000000001}, {-35.5084604636252, 185.5020024023535}}]},
        StatusArea[#, 0.056617126680820945`]& ,
        TagBoxNote->"0.056617126680820945"],
       StyleBox["0.056617126680820945`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.056617126680820945`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{5., 0}, {5.5, 0.02689313517338995}]},
          ImageSizeCache->{{117.7368000000001, 129.4449600000001}, {
           79.8920325410136, 185.5020024023535}}]},
        StatusArea[#, 0.02689313517338995]& ,
        TagBoxNote->"0.02689313517338995"],
       StyleBox["0.02689313517338995`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.02689313517338995, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{5.5, 0}, {6., 0.03113941967445152}]},
          
          ImageSizeCache->{{128.2449600000001, 139.9531200000001}, {
           63.4062478260652, 185.5020024023535}}]},
        StatusArea[#, 0.03113941967445152]& ,
        TagBoxNote->"0.03113941967445152"],
       StyleBox["0.03113941967445152`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.03113941967445152, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{6., 0}, {6.5, 0.02264685067232838}]},
          
          ImageSizeCache->{{138.7531200000001, 150.4612800000001}, {
           96.377817255962, 185.5020024023535}}]},
        StatusArea[#, 0.02264685067232838]& ,
        TagBoxNote->"0.02264685067232838"],
       StyleBox["0.02264685067232838`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.02264685067232838, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{6.5, 0}, {7., 0.01556970983722576}]},
          
          ImageSizeCache->{{149.2612800000001, 160.96944000000013`}, {
           123.85412511420934`, 185.5020024023535}}]},
        StatusArea[#, 0.01556970983722576]& ,
        TagBoxNote->"0.01556970983722576"],
       StyleBox["0.01556970983722576`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.01556970983722576, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{7., 0}, {7.5, 0.05803255484784147}]},
          
          ImageSizeCache->{{159.76944000000015`, 
           171.47760000000017`}, {-41.00372203527468, 185.50200240235353`}}]},
        StatusArea[#, 0.05803255484784147]& ,
        TagBoxNote->"0.05803255484784147"],
       StyleBox["0.05803255484784147`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.05803255484784147, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{7.5, 0}, {8., 0.04104741684359519}]},
          
          ImageSizeCache->{{170.27760000000015`, 181.98576000000014`}, {
           24.93941682451893, 185.5020024023535}}]},
        StatusArea[#, 0.04104741684359519]& ,
        TagBoxNote->"0.04104741684359519"],
       StyleBox["0.04104741684359519`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.04104741684359519, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{8., 0}, {8.5, 0.052370842179759375`}]},
          
          ImageSizeCache->{{180.78576000000015`, 
           192.49392000000017`}, {-19.02267574867679, 185.5020024023535}}]},
        StatusArea[#, 0.052370842179759375`]& ,
        TagBoxNote->"0.052370842179759375"],
       StyleBox["0.052370842179759375`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.052370842179759375`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{8.5, 0}, {9., 0.024062278839348902`}]},
          
          ImageSizeCache->{{191.29392000000016`, 203.00208000000015`}, {
           90.88255568431254, 185.5020024023535}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{9., 0}, {9.5, 0.03680113234253362}]},
          
          ImageSizeCache->{{201.80208000000016`, 213.51024000000018`}, {
           41.42520153946734, 185.5020024023535}}]},
        StatusArea[#, 0.03680113234253362]& ,
        TagBoxNote->"0.03680113234253362"],
       StyleBox["0.03680113234253362`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.03680113234253362, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{9.5, 0}, {10., 0.04529370134465676}]},
          
          ImageSizeCache->{{212.3102400000002, 224.01840000000018`}, {
           8.45363210957052, 185.5020024023535}}]},
        StatusArea[#, 0.04529370134465676]& ,
        TagBoxNote->"0.04529370134465676"],
       StyleBox["0.04529370134465676`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.04529370134465676, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{10., 0}, {10.5, 0.07501769285208776}]},
          
          ImageSizeCache->{{222.8184000000002, 
           234.5265600000002}, {-106.94686089506828`, 185.5020024023535}}]},
        StatusArea[#, 0.07501769285208776]& ,
        TagBoxNote->"0.07501769285208776"],
       StyleBox["0.07501769285208776`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.07501769285208776, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{10.5, 0}, {11., 0.043878273177636234`}]},
          ImageSizeCache->{{233.3265600000002, 245.0347200000002}, {
           13.94889368122, 185.5020024023535}}]},
        StatusArea[#, 0.043878273177636234`]& ,
        TagBoxNote->"0.043878273177636234"],
       StyleBox["0.043878273177636234`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.043878273177636234`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{11., 0}, {11.5, 0.05803255484784147}]},
          
          ImageSizeCache->{{243.8347200000002, 
           255.5428800000002}, {-41.00372203527468, 185.50200240235353`}}]},
        StatusArea[#, 0.05803255484784147]& ,
        TagBoxNote->"0.05803255484784147"],
       StyleBox["0.05803255484784147`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.05803255484784147, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{11.5, 0}, {12., 0.06510969568294409}]},
          
          ImageSizeCache->{{254.34288000000018`, 
           266.0510400000002}, {-68.48002989352202, 185.50200240235353`}}]},
        StatusArea[#, 0.06510969568294409]& ,
        TagBoxNote->"0.06510969568294409"],
       StyleBox["0.06510969568294409`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.06510969568294409, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{12., 0}, {12.5, 0.09200283085633404}]},
          
          ImageSizeCache->{{264.8510400000002, 
           276.5592000000002}, {-172.88999975486195`, 185.50200240235353`}}]},
        StatusArea[#, 0.09200283085633404]& ,
        TagBoxNote->"0.09200283085633404"],
       StyleBox["0.09200283085633404`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.09200283085633404, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{12.5, 0}, {13., 0.04953998584571833}]},
          
          ImageSizeCache->{{275.3592000000002, 
           287.0673600000002}, {-8.032152605377917, 185.50200240235353`}}]},
        StatusArea[#, 0.04953998584571833]& ,
        TagBoxNote->"0.04953998584571833"],
       StyleBox["0.04953998584571833`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.04953998584571833, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{13., 0}, {13.5, 0.0835102618542109}]},
          
          ImageSizeCache->{{285.8673600000002, 
           297.5755200000002}, {-139.91843032496513`, 185.50200240235353`}}]},
        StatusArea[#, 0.0835102618542109]& ,
        TagBoxNote->"0.0835102618542109"],
       StyleBox["0.0835102618542109`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.0835102618542109, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{13.5, 0}, {14., 0.06369426751592357}]},
          
          ImageSizeCache->{{296.3755200000002, 
           308.08368000000024`}, {-62.98476832187259, 185.50200240235353`}}]},
        StatusArea[#, 0.06369426751592357]& ,
        TagBoxNote->"0.06369426751592357"],
       StyleBox["0.06369426751592357`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.06369426751592357, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{14., 0}, {14.5, 0.05803255484784147}]},
          
          ImageSizeCache->{{306.88368000000025`, 
           318.5918400000002}, {-41.003722035274706`, 185.50200240235353`}}]},
        StatusArea[#, 0.05803255484784147]& ,
        TagBoxNote->"0.05803255484784147"],
       StyleBox["0.05803255484784147`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.05803255484784147, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{14.5, 0}, {15., 0.048124557678697805`}]},
          
          ImageSizeCache->{{317.39184000000023`, 
           329.10000000000025`}, {-2.5368910337284376`, 
           185.50200240235353`}}]},
        StatusArea[#, 0.048124557678697805`]& ,
        TagBoxNote->"0.048124557678697805"],
       StyleBox["0.048124557678697805`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.048124557678697805`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{15., 0}, {15.5, 0.052370842179759375`}]},
          
          ImageSizeCache->{{327.90000000000026`, 
           339.6081600000002}, {-19.022675748676818`, 185.50200240235353`}}]},
        StatusArea[#, 0.052370842179759375`]& ,
        TagBoxNote->"0.052370842179759375"],
       StyleBox["0.052370842179759375`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.052370842179759375`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{15.5, 0}, {16., 0.03680113234253362}]},
          
          ImageSizeCache->{{338.40816000000024`, 350.11632000000026`}, {
           41.42520153946731, 185.50200240235353`}}]},
        StatusArea[#, 0.03680113234253362]& ,
        TagBoxNote->"0.03680113234253362"],
       StyleBox["0.03680113234253362`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.03680113234253362, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{16., 0}, {16.5, 0.028308563340410473`}]},
          ImageSizeCache->{{348.91632000000027`, 360.6244800000003}, {
           74.39677096936411, 185.50200240235353`}}]},
        StatusArea[#, 0.028308563340410473`]& ,
        TagBoxNote->"0.028308563340410473"],
       StyleBox["0.028308563340410473`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.028308563340410473`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{16.5, 0}, {17., 0.024062278839348902`}]},
          
          ImageSizeCache->{{359.4244800000003, 371.13264000000026`}, {
           90.8825556843125, 185.50200240235353`}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{17., 0}, {17.5, 0.024062278839348902`}]},
          
          ImageSizeCache->{{369.9326400000003, 381.6408000000003}, {
           90.8825556843125, 185.50200240235353`}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{17.5, 0}, {18., 0.029723991507430998`}]},
          
          ImageSizeCache->{{380.4408000000003, 392.1489600000003}, {
           68.90150939771463, 185.50200240235353`}}]},
        StatusArea[#, 0.029723991507430998`]& ,
        TagBoxNote->"0.029723991507430998"],
       StyleBox["0.029723991507430998`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.029723991507430998`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{18., 0}, {18.5, 0.024062278839348902`}]},
          
          ImageSizeCache->{{390.9489600000003, 402.6571200000003}, {
           90.8825556843125, 185.50200240235353`}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{18.5, 0}, {19., 0.029723991507430998`}]},
          
          ImageSizeCache->{{401.4571200000003, 413.16528000000034`}, {
           68.90150939771463, 185.50200240235353`}}]},
        StatusArea[#, 0.029723991507430998`]& ,
        TagBoxNote->"0.029723991507430998"],
       StyleBox["0.029723991507430998`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.029723991507430998`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{19., 0}, {19.5, 0.029723991507430998`}]},
          
          ImageSizeCache->{{411.96528000000035`, 423.6734400000003}, {
           68.90150939771463, 185.50200240235353`}}]},
        StatusArea[#, 0.029723991507430998`]& ,
        TagBoxNote->"0.029723991507430998"],
       StyleBox["0.029723991507430998`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.029723991507430998`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{19.5, 0}, {20., 0.02689313517338995}]},
          
          ImageSizeCache->{{422.4734400000003, 434.18160000000034`}, {
           79.89203254101358, 185.50200240235353`}}]},
        StatusArea[#, 0.02689313517338995]& ,
        TagBoxNote->"0.02689313517338995"],
       StyleBox["0.02689313517338995`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.02689313517338995, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{20., 0}, {20.5, 0.03113941967445152}]},
          
          ImageSizeCache->{{432.98160000000036`, 444.6897600000003}, {
           63.40624782606517, 185.50200240235353`}}]},
        StatusArea[#, 0.03113941967445152]& ,
        TagBoxNote->"0.03113941967445152"],
       StyleBox["0.03113941967445152`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.03113941967445152, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{20.5, 0}, {21., 0.04529370134465676}]},
          
          ImageSizeCache->{{443.48976000000033`, 455.19792000000035`}, {
           8.453632109570492, 185.50200240235353`}}]},
        StatusArea[#, 0.04529370134465676]& ,
        TagBoxNote->"0.04529370134465676"],
       StyleBox["0.04529370134465676`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.04529370134465676, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{21., 0}, {21.5, 0.019815994338287332`}]},
          
          ImageSizeCache->{{453.99792000000036`, 465.7060800000004}, {
           107.36834039926092`, 185.50200240235353`}}]},
        StatusArea[#, 0.019815994338287332`]& ,
        TagBoxNote->"0.019815994338287332"],
       StyleBox["0.019815994338287332`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.019815994338287332`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{21.5, 0}, {22., 0.019815994338287332`}]},
          
          ImageSizeCache->{{464.5060800000004, 476.21424000000036`}, {
           107.36834039926092`, 185.50200240235353`}}]},
        StatusArea[#, 0.019815994338287332`]& ,
        TagBoxNote->"0.019815994338287332"],
       StyleBox["0.019815994338287332`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.019815994338287332`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{22., 0}, {22.5, 0.008492569002123142}]},
          
          ImageSizeCache->{{475.01424000000037`, 486.7224000000004}, {
           151.33043297245663`, 185.50200240235353`}}]},
        StatusArea[#, 0.008492569002123142]& ,
        TagBoxNote->"0.008492569002123142"],
       StyleBox["0.008492569002123142`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.008492569002123142, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{22.5, 0}, {23., 0.014154281670205236`}]},
          
          ImageSizeCache->{{485.5224000000004, 497.23056000000037`}, {
           129.34938668585878`, 185.50200240235353`}}]},
        StatusArea[#, 0.014154281670205236`]& ,
        TagBoxNote->"0.014154281670205236"],
       StyleBox["0.014154281670205236`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.014154281670205236`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{23., 0}, {23.5, 0.019815994338287332`}]},
          
          ImageSizeCache->{{496.0305600000004, 507.7387200000004}, {
           107.36834039926092`, 185.50200240235353`}}]},
        StatusArea[#, 0.019815994338287332`]& ,
        TagBoxNote->"0.019815994338287332"],
       StyleBox["0.019815994338287332`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.019815994338287332`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{23.5, 0}, {24., 0.029723991507430998`}]},
          
          ImageSizeCache->{{506.5387200000004, 518.2468800000005}, {
           68.90150939771463, 185.50200240235353`}}]},
        StatusArea[#, 0.029723991507430998`]& ,
        TagBoxNote->"0.029723991507430998"],
       StyleBox["0.029723991507430998`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.029723991507430998`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{24., 0}, {24.5, 0.024062278839348902`}]},
          
          ImageSizeCache->{{517.0468800000004, 528.7550400000006}, {
           90.8825556843125, 185.50200240235353`}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{24.5, 0}, {25., 0.024062278839348902`}]},
          
          ImageSizeCache->{{527.5550400000005, 539.2632000000006}, {
           90.8825556843125, 185.50200240235353`}}]},
        StatusArea[#, 0.024062278839348902`]& ,
        TagBoxNote->"0.024062278839348902"],
       StyleBox["0.024062278839348902`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.024062278839348902`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{25., 0}, {25.5, 0.025477707006369428`}]},
          
          ImageSizeCache->{{538.0632000000005, 549.7713600000005}, {
           85.38729411266304, 185.50200240235353`}}]},
        StatusArea[#, 0.025477707006369428`]& ,
        TagBoxNote->"0.025477707006369428"],
       StyleBox["0.025477707006369428`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.025477707006369428`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{25.5, 0}, {26., 0.021231422505307854`}]},
          
          ImageSizeCache->{{548.5713600000005, 560.2795200000005}, {
           101.87307882761145`, 185.50200240235353`}}]},
        StatusArea[#, 0.021231422505307854`]& ,
        TagBoxNote->"0.021231422505307854"],
       StyleBox["0.021231422505307854`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.021231422505307854`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{26., 0}, {26.5, 0.029723991507430998`}]},
          
          ImageSizeCache->{{559.0795200000005, 570.7876800000006}, {
           68.90150939771463, 185.50200240235353`}}]},
        StatusArea[#, 0.029723991507430998`]& ,
        TagBoxNote->"0.029723991507430998"],
       StyleBox["0.029723991507430998`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.029723991507430998`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{26.5, 0}, {27., 0.039631988676574664`}]},
          
          ImageSizeCache->{{569.5876800000005, 581.2958400000006}, {
           30.43467839616838, 185.50200240235353`}}]},
        StatusArea[#, 0.039631988676574664`]& ,
        TagBoxNote->"0.039631988676574664"],
       StyleBox["0.039631988676574664`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.039631988676574664`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{27., 0}, {27.5, 0.028308563340410473`}]},
          
          ImageSizeCache->{{580.0958400000005, 591.8040000000005}, {
           74.39677096936411, 185.50200240235353`}}]},
        StatusArea[#, 0.028308563340410473`]& ,
        TagBoxNote->"0.028308563340410473"],
       StyleBox["0.028308563340410473`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.028308563340410473`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{27.5, 0}, {28., 0.025477707006369428`}]},
          
          ImageSizeCache->{{590.6040000000005, 602.3121600000006}, {
           85.38729411266304, 185.50200240235353`}}]},
        StatusArea[#, 0.025477707006369428`]& ,
        TagBoxNote->"0.025477707006369428"],
       StyleBox["0.025477707006369428`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.025477707006369428`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{28., 0}, {28.5, 0.01132342533616419}]},
          ImageSizeCache->{{601.1121600000006, 612.8203200000006}, {
           140.33990982915773`, 185.50200240235353`}}]},
        StatusArea[#, 0.01132342533616419]& ,
        TagBoxNote->"0.01132342533616419"],
       StyleBox["0.01132342533616419`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.01132342533616419, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{28.5, 0}, {29., 0.016985138004246284`}]},
          
          ImageSizeCache->{{611.6203200000006, 623.3284800000006}, {
           118.35886354255985`, 185.50200240235353`}}]},
        StatusArea[#, 0.016985138004246284`]& ,
        TagBoxNote->"0.016985138004246284"],
       StyleBox["0.016985138004246284`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.016985138004246284`, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{29., 0}, {29.5, 0.02689313517338995}]},
          
          ImageSizeCache->{{622.1284800000005, 633.8366400000007}, {
           79.89203254101358, 185.50200240235353`}}]},
        StatusArea[#, 0.02689313517338995]& ,
        TagBoxNote->"0.02689313517338995"],
       StyleBox["0.02689313517338995`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.02689313517338995, {
         GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
     TagBox[
      TooltipBox[
       TagBox[
        {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
         EdgeForm[Opacity[0.7]], 
         DynamicBox[{
           FrontEnd`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           RectangleBox[{29.5, 0}, {30., 0.028308563340410473`}]},
          
          ImageSizeCache->{{632.6366400000006, 644.3448000000006}, {
           74.39677096936411, 185.50200240235353`}}]},
        StatusArea[#, 0.028308563340410473`]& ,
        TagBoxNote->"0.028308563340410473"],
       StyleBox["0.028308563340410473`", {
         GrayLevel[0]}, StripOnInput -> False]],
      Annotation[#, 
       Style[0.028308563340410473`, {
         GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesOrigin->{2., 0},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  ImageSize->{548.3333333333338, Automatic},
  PlotRange->Automatic,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.1]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.503805594109375*^9, 3.503805605296875*^9}, 
   3.503805710296875*^9, 3.50380680684375*^9, 3.503807014171875*^9, 
   3.503812305703125*^9, 3.50381260796875*^9, 3.503822238890625*^9, 
   3.503822367765625*^9, 3.50422057984375*^9, 3.504220844125*^9, 
   3.50425423275*^9, 3.504254286046875*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Show", "[", 
    RowBox[{"Ppdf2", ",", "h2", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "100"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "100"}], "}"}]}], "}"}]}]}], "]"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"Histogram", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"sddiff", ",", "sdsame"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0", ",", "32", ",", "0.3"}], "}"}], ",", 
    "\"\<ProbabilityDensity\>\"", ",", 
    RowBox[{"PlotRange", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "30"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0.25"}], "}"}]}], "}"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.5037433643125*^9, 3.503743365125*^9}, {
   3.50374339859375*^9, 3.503743407765625*^9}, 3.503743446578125*^9, 
   3.503812028140625*^9, {3.50425461625*^9, 3.50425465740625*^9}, {
   3.504254754734375*^9, 3.5042547753125*^9}, {3.504254828296875*^9, 
   3.5042548338125*^9}, {3.50425535065625*^9, 3.504255358484375*^9}, {
   3.504255405171875*^9, 3.504255448484375*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {{{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.1, 0}, {2.4, 0.0022045855379188724`}]},
           
           ImageSizeCache->{{81.07062857142867, 90.4235755102042}, {
            238.82422546106847`, 244.09732815676324`}}]},
         StatusArea[#, 0.0022045855379188724`]& ,
         TagBoxNote->"0.0022045855379188724"],
        StyleBox["0.0022045855379188724`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0022045855379188724`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{2.4, 0}, {2.6999999999999997`, 
             0.004409171075837745}]},
           
           ImageSizeCache->{{89.2235755102042, 98.5765224489797}, {
            234.7511227653737, 244.09732815676324`}}]},
         StatusArea[#, 0.004409171075837745]& ,
         TagBoxNote->"0.004409171075837745"],
        StyleBox["0.004409171075837745`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.004409171075837745, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{2.6999999999999997`, 0}, {3., 
             0.006613756613756607}]},
           
           ImageSizeCache->{{97.3765224489797, 106.72946938775523`}, {
            230.67802006967895`, 244.09732815676324`}}]},
         StatusArea[#, 0.006613756613756607]& ,
         TagBoxNote->"0.006613756613756607"],
        StyleBox["0.006613756613756607`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.006613756613756607, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3., 0}, {3.3, 0.01763668430335098}]},
           
           ImageSizeCache->{{105.52946938775523`, 114.88241632653076`}, {
            210.31250659120502`, 244.09732815676324`}}]},
         StatusArea[#, 0.01763668430335098]& ,
         TagBoxNote->"0.01763668430335098"],
        StyleBox["0.01763668430335098`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01763668430335098, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{3.3, 0}, {3.5999999999999996`, 
             0.03306878306878309}]},
           
           ImageSizeCache->{{113.68241632653076`, 123.03536326530629`}, {
            181.80078772134158`, 244.09732815676324`}}]},
         StatusArea[#, 0.03306878306878309]& ,
         TagBoxNote->"0.03306878306878309"],
        StyleBox["0.03306878306878309`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03306878306878309, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{3.5999999999999996`, 0}, {3.9, 
             0.04850088183421512}]},
           
           ImageSizeCache->{{121.83536326530628`, 131.1883102040818}, {
            153.2890688514783, 244.09732815676324`}}]},
         StatusArea[#, 0.04850088183421512]& ,
         TagBoxNote->"0.04850088183421512"],
        StyleBox["0.04850088183421512`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04850088183421512, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.9, 0}, {4.2, 0.06613756613756608}]},
           
           ImageSizeCache->{{129.9883102040818, 139.34125714285733`}, {
            120.70424728592013`, 244.09732815676324`}}]},
         StatusArea[#, 0.06613756613756608]& ,
         TagBoxNote->"0.06613756613756608"],
        StyleBox["0.06613756613756608`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06613756613756608, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.2, 0}, {4.5, 0.06613756613756618}]},
           
           ImageSizeCache->{{138.14125714285734`, 147.49420408163283`}, {
            120.70424728591995`, 244.09732815676324`}}]},
         StatusArea[#, 0.06613756613756618]& ,
         TagBoxNote->"0.06613756613756618"],
        StyleBox["0.06613756613756618`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06613756613756618, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.5, 0}, {4.8, 0.052910052910052935`}]},
           
           ImageSizeCache->{{146.29420408163284`, 155.64715102040836`}, {
            145.14286346008862`, 244.09732815676324`}}]},
         StatusArea[#, 0.052910052910052935`]& ,
         TagBoxNote->"0.052910052910052935"],
        StyleBox["0.052910052910052935`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.052910052910052935`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.8, 0}, {5.1, 0.04629629629629632}]},
           
           ImageSizeCache->{{154.44715102040837`, 163.80009795918386`}, {
            157.36217154717292`, 244.09732815676324`}}]},
         StatusArea[#, 0.04629629629629632]& ,
         TagBoxNote->"0.04629629629629632"],
        StyleBox["0.04629629629629632`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04629629629629632, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{5.1, 0}, {5.3999999999999995`, 
             0.024250440917107596`}]},
           
           ImageSizeCache->{{162.60009795918387`, 171.9530448979594}, {
            198.09319850412072`, 244.09732815676324`}}]},
         StatusArea[#, 0.024250440917107596`]& ,
         TagBoxNote->"0.024250440917107596"],
        StyleBox["0.024250440917107596`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107596`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{5.3999999999999995`, 0}, {5.7, 
             0.030864197530864123`}]},
           
           ImageSizeCache->{{170.7530448979594, 180.10599183673494`}, {
            185.87389041703653`, 244.09732815676324`}}]},
         StatusArea[#, 0.030864197530864123`]& ,
         TagBoxNote->"0.030864197530864123"],
        StyleBox["0.030864197530864123`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864123`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.7, 0}, {6., 0.024250440917107596`}]},
           
           ImageSizeCache->{{178.90599183673496`, 188.25893877551044`}, {
            198.09319850412072`, 244.09732815676324`}}]},
         StatusArea[#, 0.024250440917107596`]& ,
         TagBoxNote->"0.024250440917107596"],
        StyleBox["0.024250440917107596`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107596`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6., 0}, {6.3, 0.022045855379188725`}]},
           
           ImageSizeCache->{{187.05893877551046`, 196.41188571428597`}, {
            202.16630119981545`, 244.09732815676324`}}]},
         StatusArea[#, 0.022045855379188725`]& ,
         TagBoxNote->"0.022045855379188725"],
        StyleBox["0.022045855379188725`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.022045855379188725`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.3, 0}, {6.6, 0.022045855379188725`}]},
           
           ImageSizeCache->{{195.21188571428598`, 204.5648326530615}, {
            202.16630119981545`, 244.09732815676324`}}]},
         StatusArea[#, 0.022045855379188725`]& ,
         TagBoxNote->"0.022045855379188725"],
        StyleBox["0.022045855379188725`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.022045855379188725`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{6.6, 0}, {6.8999999999999995`, 
             0.011022927689594363`}]},
           
           ImageSizeCache->{{203.3648326530615, 212.717779591837}, {
            222.53181467828938`, 244.09732815676324`}}]},
         StatusArea[#, 0.011022927689594363`]& ,
         TagBoxNote->"0.011022927689594363"],
        StyleBox["0.011022927689594363`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.011022927689594363`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{6.8999999999999995`, 0}, {7.199999999999999, 
             0.030864197530864213`}]},
           
           ImageSizeCache->{{211.517779591837, 220.87072653061253`}, {
            185.87389041703636`, 244.09732815676324`}}]},
         StatusArea[#, 0.030864197530864213`]& ,
         TagBoxNote->"0.030864197530864213"],
        StyleBox["0.030864197530864213`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864213`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.199999999999999, 0}, {7.5, 0.06393298059964711}]},
           
           ImageSizeCache->{{219.67072653061254`, 229.02367346938806`}, {
            124.77734998161509`, 244.09732815676324`}}]},
         StatusArea[#, 0.06393298059964711]& ,
         TagBoxNote->"0.06393298059964711"],
        StyleBox["0.06393298059964711`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06393298059964711, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.5, 0}, {7.8, 0.04188712522045857}]},
           
           ImageSizeCache->{{227.82367346938807`, 237.1766204081636}, {
            165.5083769385625, 244.09732815676324`}}]},
         StatusArea[#, 0.04188712522045857]& ,
         TagBoxNote->"0.04188712522045857"],
        StyleBox["0.04188712522045857`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04188712522045857, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.8, 0}, {8.1, 0.03306878306878309}]},
           
           ImageSizeCache->{{235.9766204081636, 245.32956734693911`}, {
            181.80078772134158`, 244.09732815676324`}}]},
         StatusArea[#, 0.03306878306878309]& ,
         TagBoxNote->"0.03306878306878309"],
        StyleBox["0.03306878306878309`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03306878306878309, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.1, 0}, {8.4, 0.048500881834215054`}]},
           
           ImageSizeCache->{{244.12956734693913`, 253.48251428571464`}, {
            153.28906885147842`, 244.09732815676324`}}]},
         StatusArea[#, 0.048500881834215054`]& ,
         TagBoxNote->"0.048500881834215054"],
        StyleBox["0.048500881834215054`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.048500881834215054`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.4, 0}, {8.7, 0.03968253968253982}]},
           
           ImageSizeCache->{{252.28251428571463`, 261.6354612244902}, {
            169.58147963425702`, 244.09732815676327`}}]},
         StatusArea[#, 0.03968253968253982]& ,
         TagBoxNote->"0.03968253968253982"],
        StyleBox["0.03968253968253982`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03968253968253982, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.7, 0}, {9., 0.019841269841269795`}]},
           
           ImageSizeCache->{{260.43546122449015`, 269.7884081632657}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9., 0}, {9.299999999999999, 0.03527336860670206}]},
           
           ImageSizeCache->{{268.5884081632657, 277.94135510204114`}, {
            177.7276850256466, 244.09732815676327`}}]},
         StatusArea[#, 0.03527336860670206]& ,
         TagBoxNote->"0.03527336860670206"],
        StyleBox["0.03527336860670206`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03527336860670206, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{9.299999999999999, 0}, {9.6, 
             0.030864197530864123`}]},
           
           ImageSizeCache->{{276.74135510204115`, 286.09430204081673`}, {
            185.8738904170365, 244.09732815676327`}}]},
         StatusArea[#, 0.030864197530864123`]& ,
         TagBoxNote->"0.030864197530864123"],
        StyleBox["0.030864197530864123`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864123`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.6, 0}, {9.9, 0.041887125220458454`}]},
           
           ImageSizeCache->{{284.89430204081674`, 294.24724897959226`}, {
            165.5083769385627, 244.09732815676327`}}]},
         StatusArea[#, 0.041887125220458454`]& ,
         TagBoxNote->"0.041887125220458454"],
        StyleBox["0.041887125220458454`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.041887125220458454`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.9, 0}, {10.2, 0.05952380952380973}]},
           
           ImageSizeCache->{{293.04724897959227`, 302.40019591836773`}, {
            132.92355537300395`, 244.09732815676327`}}]},
         StatusArea[#, 0.05952380952380973]& ,
         TagBoxNote->"0.05952380952380973"],
        StyleBox["0.05952380952380973`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05952380952380973, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.2, 0}, {10.5, 0.07716049382716031}]},
           
           ImageSizeCache->{{301.20019591836774`, 310.5531428571433}, {
            100.33873380744649`, 244.09732815676327`}}]},
         StatusArea[#, 0.07716049382716031]& ,
         TagBoxNote->"0.07716049382716031"],
        StyleBox["0.07716049382716031`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07716049382716031, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{10.5, 0}, {10.799999999999999`, 
             0.03968253968253982}]},
           
           ImageSizeCache->{{309.3531428571433, 318.7060897959188}, {
            169.58147963425702`, 244.09732815676327`}}]},
         StatusArea[#, 0.03968253968253982]& ,
         TagBoxNote->"0.03968253968253982"],
        StyleBox["0.03968253968253982`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03968253968253982, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{10.799999999999999`, 0}, {11.1, 
             0.055114638447971646`}]},
           
           ImageSizeCache->{{317.5060897959188, 326.8590367346943}, {
            141.0697607643941, 244.09732815676327`}}]},
         StatusArea[#, 0.055114638447971646`]& ,
         TagBoxNote->"0.055114638447971646"],
        StyleBox["0.055114638447971646`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.055114638447971646`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.1, 0}, {11.4, 0.05291005291005278}]},
           
           ImageSizeCache->{{325.6590367346943, 335.0119836734699}, {
            145.14286346008888`, 244.09732815676327`}}]},
         StatusArea[#, 0.05291005291005278]& ,
         TagBoxNote->"0.05291005291005278"],
        StyleBox["0.05291005291005278`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05291005291005278, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.4, 0}, {11.7, 0.04850088183421534}]},
           
           ImageSizeCache->{{333.8119836734699, 343.16493061224537`}, {
            153.28906885147788`, 244.09732815676327`}}]},
         StatusArea[#, 0.04850088183421534]& ,
         TagBoxNote->"0.04850088183421534"],
        StyleBox["0.04850088183421534`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04850088183421534, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.7, 0}, {12., 0.06393298059964711}]},
           
           ImageSizeCache->{{341.9649306122454, 351.3178775510209}, {
            124.77734998161506`, 244.09732815676327`}}]},
         StatusArea[#, 0.06393298059964711]& ,
         TagBoxNote->"0.06393298059964711"],
        StyleBox["0.06393298059964711`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06393298059964711, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12., 0}, {12.299999999999999`, 0.0837742504409174}]},
           
           ImageSizeCache->{{350.1178775510209, 359.4708244897964}, {
            88.11942572036128, 244.09732815676327`}}]},
         StatusArea[#, 0.0837742504409174]& ,
         TagBoxNote->"0.0837742504409174"],
        StyleBox["0.0837742504409174`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0837742504409174, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{12.299999999999999`, 0}, {12.6, 
             0.07936507936507918}]},
           
           ImageSizeCache->{{358.27082448979644`, 367.62377142857196`}, {
            96.2656311117517, 244.09732815676327`}}]},
         StatusArea[#, 0.07936507936507918]& ,
         TagBoxNote->"0.07936507936507918"],
        StyleBox["0.07936507936507918`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07936507936507918, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.6, 0}, {12.9, 0.041887125220458454`}]},
           
           ImageSizeCache->{{366.42377142857197`, 375.7767183673475}, {
            165.5083769385627, 244.09732815676327`}}]},
         StatusArea[#, 0.041887125220458454`]& ,
         TagBoxNote->"0.041887125220458454"],
        StyleBox["0.041887125220458454`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.041887125220458454`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.9, 0}, {13.2, 0.0837742504409174}]},
           ImageSizeCache->{{374.5767183673475, 383.929665306123}, {
            88.11942572036128, 244.09732815676327`}}]},
         StatusArea[#, 0.0837742504409174]& ,
         TagBoxNote->"0.0837742504409174"],
        StyleBox["0.0837742504409174`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0837742504409174, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13.2, 0}, {13.5, 0.061728395061728246`}]},
           
           ImageSizeCache->{{382.729665306123, 392.08261224489854`}, {
            128.8504526773098, 244.09732815676327`}}]},
         StatusArea[#, 0.061728395061728246`]& ,
         TagBoxNote->"0.061728395061728246"],
        StyleBox["0.061728395061728246`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.061728395061728246`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{13.5, 0}, {13.799999999999999`, 
             0.06834215167548524}]},
           
           ImageSizeCache->{{390.88261224489855`, 400.235559183674}, {
            116.63114459022479`, 244.09732815676327`}}]},
         StatusArea[#, 0.06834215167548524]& ,
         TagBoxNote->"0.06834215167548524"],
        StyleBox["0.06834215167548524`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06834215167548524, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{13.799999999999999`, 0}, {14.1, 
             0.05291005291005278}]},
           
           ImageSizeCache->{{399.035559183674, 408.38850612244954`}, {
            145.14286346008888`, 244.09732815676327`}}]},
         StatusArea[#, 0.05291005291005278]& ,
         TagBoxNote->"0.05291005291005278"],
        StyleBox["0.05291005291005278`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05291005291005278, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{14.1, 0}, {14.399999999999999`, 
             0.06172839506172861}]},
           
           ImageSizeCache->{{407.18850612244955`, 416.54145306122507`}, {
            128.85045267730916`, 244.09732815676327`}}]},
         StatusArea[#, 0.06172839506172861]& ,
         TagBoxNote->"0.06172839506172861"],
        StyleBox["0.06172839506172861`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06172839506172861, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{14.399999999999999`, 0}, {14.7, 
             0.02645502645502639}]},
           
           ImageSizeCache->{{415.3414530612251, 424.6944000000006}, {
            194.02009580842602`, 244.09732815676327`}}]},
         StatusArea[#, 0.02645502645502639]& ,
         TagBoxNote->"0.02645502645502639"],
        StyleBox["0.02645502645502639`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02645502645502639, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14.7, 0}, {15., 0.055114638447971646`}]},
           
           ImageSizeCache->{{423.4944000000006, 432.8473469387761}, {
            141.0697607643941, 244.09732815676327`}}]},
         StatusArea[#, 0.055114638447971646`]& ,
         TagBoxNote->"0.055114638447971646"],
        StyleBox["0.055114638447971646`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.055114638447971646`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15., 0}, {15.299999999999999`, 
             0.028659611992945425`}]},
           
           ImageSizeCache->{{431.64734693877614`, 441.00029387755166`}, {
            189.94699311273095`, 244.09732815676327`}}]},
         StatusArea[#, 0.028659611992945425`]& ,
         TagBoxNote->"0.028659611992945425"],
        StyleBox["0.028659611992945425`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.028659611992945425`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15.299999999999999`, 0}, {15.6, 
             0.06834215167548484}]},
           
           ImageSizeCache->{{439.80029387755167`, 449.1532408163272}, {
            116.63114459022553`, 244.09732815676327`}}]},
         StatusArea[#, 0.06834215167548484]& ,
         TagBoxNote->"0.06834215167548484"],
        StyleBox["0.06834215167548484`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06834215167548484, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15.6, 0}, {15.899999999999999`, 
             0.02425044091710767}]},
           
           ImageSizeCache->{{447.9532408163272, 457.30618775510266`}, {
            198.09319850412052`, 244.09732815676327`}}]},
         StatusArea[#, 0.02425044091710767]& ,
         TagBoxNote->"0.02425044091710767"],
        StyleBox["0.02425044091710767`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02425044091710767, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15.899999999999999`, 0}, {16.2, 
             0.04409171075837732}]},
           
           ImageSizeCache->{{456.10618775510267`, 465.45913469387824`}, {
            161.4352742428679, 244.09732815676327`}}]},
         StatusArea[#, 0.04409171075837732]& ,
         TagBoxNote->"0.04409171075837732"],
        StyleBox["0.04409171075837732`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04409171075837732, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16.2, 0}, {16.5, 0.017636684303350927`}]},
           
           ImageSizeCache->{{464.25913469387825`, 473.61208163265377`}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16.5, 0}, {16.8, 0.017636684303350927`}]},
           
           ImageSizeCache->{{472.4120816326538, 481.7650285714293}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{16.8, 0}, {17.099999999999998`, 
             0.03306878306878338}]},
           
           ImageSizeCache->{{480.5650285714293, 489.91797551020477`}, {
            181.80078772134104`, 244.09732815676327`}}]},
         StatusArea[#, 0.03306878306878338]& ,
         TagBoxNote->"0.03306878306878338"],
        StyleBox["0.03306878306878338`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03306878306878338, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{17.099999999999998`, 0}, {17.4, 
             0.01102292768959433}]},
           
           ImageSizeCache->{{488.7179755102048, 498.0709224489803}, {
            222.5318146782894, 244.09732815676327`}}]},
         StatusArea[#, 0.01102292768959433]& ,
         TagBoxNote->"0.01102292768959433"],
        StyleBox["0.01102292768959433`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01102292768959433, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.4, 0}, {17.7, 0.019841269841269795`}]},
           
           ImageSizeCache->{{496.8709224489803, 506.2238693877558}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.7, 0}, {18., 0.03968253968253959}]},
           
           ImageSizeCache->{{505.02386938775584`, 514.3768163265314}, {
            169.58147963425742`, 244.09732815676327`}}]},
         StatusArea[#, 0.03968253968253959]& ,
         TagBoxNote->"0.03968253968253959"],
        StyleBox["0.03968253968253959`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03968253968253959, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18., 0}, {18.3, 0.019841269841269795`}]},
           
           ImageSizeCache->{{513.1768163265314, 522.529763265307}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{18.3, 0}, {18.599999999999998`, 
             0.026455026455026703`}]},
           
           ImageSizeCache->{{521.329763265307, 530.6827102040824}, {
            194.02009580842545`, 244.09732815676327`}}]},
         StatusArea[#, 0.026455026455026703`]& ,
         TagBoxNote->"0.026455026455026703"],
        StyleBox["0.026455026455026703`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.026455026455026703`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{18.599999999999998`, 0}, {18.9, 
             0.024250440917107527`}]},
           
           ImageSizeCache->{{529.4827102040823, 538.8356571428579}, {
            198.0931985041208, 244.09732815676327`}}]},
         StatusArea[#, 0.024250440917107527`]& ,
         TagBoxNote->"0.024250440917107527"],
        StyleBox["0.024250440917107527`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107527`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18.9, 0}, {19.2, 0.02645502645502639}]},
           
           ImageSizeCache->{{537.6356571428579, 546.9886040816335}, {
            194.02009580842602`, 244.09732815676327`}}]},
         StatusArea[#, 0.02645502645502639]& ,
         TagBoxNote->"0.02645502645502639"],
        StyleBox["0.02645502645502639`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02645502645502639, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19.2, 0}, {19.5, 0.03306878306878299}]},
           
           ImageSizeCache->{{545.7886040816335, 555.141551020409}, {
            181.80078772134172`, 244.09732815676327`}}]},
         StatusArea[#, 0.03306878306878299]& ,
         TagBoxNote->"0.03306878306878299"],
        StyleBox["0.03306878306878299`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03306878306878299, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19.5, 0}, {19.8, 0.02645502645502639}]},
           
           ImageSizeCache->{{553.941551020409, 563.2944979591846}, {
            194.02009580842602`, 244.09732815676327`}}]},
         StatusArea[#, 0.02645502645502639]& ,
         TagBoxNote->"0.02645502645502639"],
        StyleBox["0.02645502645502639`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02645502645502639, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{19.8, 0}, {20.099999999999998`, 
             0.02425044091710781}]},
           
           ImageSizeCache->{{562.0944979591845, 571.44744489796}, {
            198.0931985041203, 244.09732815676327`}}]},
         StatusArea[#, 0.02425044091710781]& ,
         TagBoxNote->"0.02425044091710781"],
        StyleBox["0.02425044091710781`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02425044091710781, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{20.099999999999998`, 0}, {20.4, 
             0.019841269841269795`}]},
           
           ImageSizeCache->{{570.24744489796, 579.6003918367355}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{20.4, 0}, {20.7, 0.05291005291005278}]},
           
           ImageSizeCache->{{578.4003918367355, 587.7533387755111}, {
            145.14286346008888`, 244.09732815676327`}}]},
         StatusArea[#, 0.05291005291005278]& ,
         TagBoxNote->"0.05291005291005278"],
        StyleBox["0.05291005291005278`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05291005291005278, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{20.7, 0}, {21., 0.03747795414462072}]},
           
           ImageSizeCache->{{586.5533387755111, 595.9062857142867}, {
            173.6545823299522, 244.09732815676327`}}]},
         StatusArea[#, 0.03747795414462072]& ,
         TagBoxNote->"0.03747795414462072"],
        StyleBox["0.03747795414462072`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03747795414462072, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{21., 0}, {21.3, 0.017636684303350927`}]},
           
           ImageSizeCache->{{594.7062857142867, 604.0592326530622}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{21.3, 0}, {21.599999999999998`, 
             0.019841269841270028`}]},
           
           ImageSizeCache->{{602.8592326530621, 612.2121795918376}, {
            206.23940389550992`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841270028`]& ,
         TagBoxNote->"0.019841269841270028"],
        StyleBox["0.019841269841270028`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841270028`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{21.599999999999998`, 0}, {21.9, 
             0.013227513227513196`}]},
           
           ImageSizeCache->{{611.0121795918376, 620.3651265306132}, {
            218.45871198259465`, 244.09732815676327`}}]},
         StatusArea[#, 0.013227513227513196`]& ,
         TagBoxNote->"0.013227513227513196"],
        StyleBox["0.013227513227513196`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.013227513227513196`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{21.9, 0}, {22.2, 0.017636684303350927`}]},
           ImageSizeCache->{{619.1651265306132, 628.5180734693887}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{22.2, 0}, {22.5, 0.006613756613756598}]},
           
           ImageSizeCache->{{627.3180734693887, 636.6710204081643}, {
            230.67802006967892`, 244.09732815676327`}}]},
         StatusArea[#, 0.006613756613756598]& ,
         TagBoxNote->"0.006613756613756598"],
        StyleBox["0.006613756613756598`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.006613756613756598, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{22.5, 0}, {22.8, 0.013227513227513196`}]},
           
           ImageSizeCache->{{635.4710204081642, 644.8239673469399}, {
            218.45871198259465`, 244.09732815676327`}}]},
         StatusArea[#, 0.013227513227513196`]& ,
         TagBoxNote->"0.013227513227513196"],
        StyleBox["0.013227513227513196`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.013227513227513196`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{22.8, 0}, {23.099999999999998`, 
             0.013227513227513352`}]},
           
           ImageSizeCache->{{643.6239673469398, 652.9769142857152}, {
            218.45871198259437`, 244.09732815676327`}}]},
         StatusArea[#, 0.013227513227513352`]& ,
         TagBoxNote->"0.013227513227513352"],
        StyleBox["0.013227513227513352`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.013227513227513352`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{23.099999999999998`, 0}, {23.4, 
             0.015432098765432061`}]},
           
           ImageSizeCache->{{651.7769142857152, 661.1298612244908}, {
            214.38560928689986`, 244.09732815676327`}}]},
         StatusArea[#, 0.015432098765432061`]& ,
         TagBoxNote->"0.015432098765432061"],
        StyleBox["0.015432098765432061`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.015432098765432061`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{23.4, 0}, {23.7, 0.02865961199294526}]},
           
           ImageSizeCache->{{659.9298612244908, 669.2828081632664}, {
            189.9469931127313, 244.09732815676327`}}]},
         StatusArea[#, 0.02865961199294526]& ,
         TagBoxNote->"0.02865961199294526"],
        StyleBox["0.02865961199294526`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02865961199294526, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{23.7, 0}, {24., 0.02865961199294526}]},
           
           ImageSizeCache->{{668.0828081632663, 677.4357551020419}, {
            189.9469931127313, 244.09732815676327`}}]},
         StatusArea[#, 0.02865961199294526]& ,
         TagBoxNote->"0.02865961199294526"],
        StyleBox["0.02865961199294526`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02865961199294526, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{24., 0}, {24.3, 0.030864197530864123`}]},
           
           ImageSizeCache->{{676.2357551020418, 685.5887020408175}, {
            185.8738904170365, 244.09732815676327`}}]},
         StatusArea[#, 0.030864197530864123`]& ,
         TagBoxNote->"0.030864197530864123"],
        StyleBox["0.030864197530864123`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864123`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{24.3, 0}, {24.599999999999998`, 
             0.017636684303351136`}]},
           
           ImageSizeCache->{{684.3887020408174, 693.7416489795929}, {
            210.3125065912047, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303351136`]& ,
         TagBoxNote->"0.017636684303351136"],
        StyleBox["0.017636684303351136`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303351136`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{24.599999999999998`, 0}, {24.9, 
             0.019841269841269795`}]},
           
           ImageSizeCache->{{692.5416489795929, 701.8945959183684}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{24.9, 0}, {25.2, 0.019841269841269795`}]},
           
           ImageSizeCache->{{700.6945959183683, 710.047542857144}, {
            206.23940389551032`, 244.09732815676327`}}]},
         StatusArea[#, 0.019841269841269795`]& ,
         TagBoxNote->"0.019841269841269795"],
        StyleBox["0.019841269841269795`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019841269841269795`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{25.2, 0}, {25.5, 0.02645502645502639}]},
           
           ImageSizeCache->{{708.8475428571439, 718.2004897959196}, {
            194.02009580842602`, 244.09732815676327`}}]},
         StatusArea[#, 0.02645502645502639]& ,
         TagBoxNote->"0.02645502645502639"],
        StyleBox["0.02645502645502639`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02645502645502639, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{25.5, 0}, {25.8, 0.01102292768959433}]},
           
           ImageSizeCache->{{717.0004897959195, 726.353436734695}, {
            222.5318146782894, 244.09732815676327`}}]},
         StatusArea[#, 0.01102292768959433]& ,
         TagBoxNote->"0.01102292768959433"],
        StyleBox["0.01102292768959433`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01102292768959433, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{25.8, 0}, {26.099999999999998`, 
             0.03527336860670227}]},
           
           ImageSizeCache->{{725.153436734695, 734.5063836734705}, {
            177.7276850256462, 244.09732815676327`}}]},
         StatusArea[#, 0.03527336860670227]& ,
         TagBoxNote->"0.03527336860670227"],
        StyleBox["0.03527336860670227`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03527336860670227, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{26.099999999999998`, 0}, {26.4, 
             0.024250440917107527`}]},
           
           ImageSizeCache->{{733.3063836734705, 742.6593306122461}, {
            198.0931985041208, 244.09732815676327`}}]},
         StatusArea[#, 0.024250440917107527`]& ,
         TagBoxNote->"0.024250440917107527"],
        StyleBox["0.024250440917107527`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107527`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{26.4, 0}, {26.7, 0.041887125220458454`}]},
           ImageSizeCache->{{741.459330612246, 750.8122775510216}, {
            165.5083769385627, 244.09732815676327`}}]},
         StatusArea[#, 0.041887125220458454`]& ,
         TagBoxNote->"0.041887125220458454"],
        StyleBox["0.041887125220458454`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.041887125220458454`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{26.7, 0}, {27., 0.02865961199294526}]},
           
           ImageSizeCache->{{749.6122775510215, 758.9652244897972}, {
            189.9469931127313, 244.09732815676327`}}]},
         StatusArea[#, 0.02865961199294526]& ,
         TagBoxNote->"0.02865961199294526"],
        StyleBox["0.02865961199294526`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02865961199294526, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{27., 0}, {27.3, 0.024250440917107527`}]},
           
           ImageSizeCache->{{757.7652244897971, 767.1181714285726}, {
            198.0931985041208, 244.09732815676327`}}]},
         StatusArea[#, 0.024250440917107527`]& ,
         TagBoxNote->"0.024250440917107527"],
        StyleBox["0.024250440917107527`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107527`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{27.3, 0}, {27.599999999999998`, 
             0.026455026455026703`}]},
           
           ImageSizeCache->{{765.9181714285726, 775.2711183673481}, {
            194.02009580842545`, 244.09732815676327`}}]},
         StatusArea[#, 0.026455026455026703`]& ,
         TagBoxNote->"0.026455026455026703"],
        StyleBox["0.026455026455026703`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.026455026455026703`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{27.599999999999998`, 0}, {27.9, 
             0.02204585537918866}]},
           
           ImageSizeCache->{{774.071118367348, 783.4240653061237}, {
            202.1663011998156, 244.09732815676327`}}]},
         StatusArea[#, 0.02204585537918866]& ,
         TagBoxNote->"0.02204585537918866"],
        StyleBox["0.02204585537918866`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02204585537918866, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{27.9, 0}, {28.2, 0.017636684303350927`}]},
           
           ImageSizeCache->{{782.2240653061236, 791.5770122448992}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{28.2, 0}, {28.5, 0.01102292768959433}]},
           
           ImageSizeCache->{{790.3770122448991, 799.7299591836747}, {
            222.5318146782894, 244.09732815676327`}}]},
         StatusArea[#, 0.01102292768959433]& ,
         TagBoxNote->"0.01102292768959433"],
        StyleBox["0.01102292768959433`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01102292768959433, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{28.5, 0}, {28.799999999999997`, 
             0.013227513227513352`}]},
           
           ImageSizeCache->{{798.5299591836747, 807.8829061224502}, {
            218.45871198259437`, 244.09732815676327`}}]},
         StatusArea[#, 0.013227513227513352`]& ,
         TagBoxNote->"0.013227513227513352"],
        StyleBox["0.013227513227513352`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.013227513227513352`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{28.799999999999997`, 0}, {29.099999999999998`, 
             0.02204585537918866}]},
           
           ImageSizeCache->{{806.6829061224502, 816.0358530612257}, {
            202.1663011998156, 244.09732815676327`}}]},
         StatusArea[#, 0.02204585537918866]& ,
         TagBoxNote->"0.02204585537918866"],
        StyleBox["0.02204585537918866`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02204585537918866, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{29.099999999999998`, 0}, {29.4, 
             0.030864197530864123`}]},
           
           ImageSizeCache->{{814.8358530612256, 824.1888000000013}, {
            185.8738904170365, 244.09732815676327`}}]},
         StatusArea[#, 0.030864197530864123`]& ,
         TagBoxNote->"0.030864197530864123"],
        StyleBox["0.030864197530864123`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864123`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{29.4, 0}, {29.7, 0.017636684303350927`}]},
           
           ImageSizeCache->{{822.9888000000012, 832.3417469387769}, {
            210.3125065912051, 244.09732815676327`}}]},
         StatusArea[#, 0.017636684303350927`]& ,
         TagBoxNote->"0.017636684303350927"],
        StyleBox["0.017636684303350927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.017636684303350927`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{29.7, 0}, {30., 0.02865961199294526}]},
           
           ImageSizeCache->{{831.1417469387768, 840.4946938775523}, {
            189.9469931127313, 244.09732815676327`}}]},
         StatusArea[#, 0.02865961199294526]& ,
         TagBoxNote->"0.02865961199294526"],
        StyleBox["0.02865961199294526`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02865961199294526, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{30., 0}, {30.299999999999997`, 0.0551146384479723}]},
           
           ImageSizeCache->{{839.2946938775523, 848.6476408163278}, {
            141.0697607643929, 244.09732815676327`}}]},
         StatusArea[#, 0.0551146384479723]& ,
         TagBoxNote->"0.0551146384479723"],
        StyleBox["0.0551146384479723`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0551146384479723, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{30.299999999999997`, 0}, {30.599999999999998`, 
             0.04409171075837732}]},
           
           ImageSizeCache->{{847.4476408163277, 856.8005877551034}, {
            161.4352742428679, 244.09732815676327`}}]},
         StatusArea[#, 0.04409171075837732]& ,
         TagBoxNote->"0.04409171075837732"],
        StyleBox["0.04409171075837732`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04409171075837732, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{30.599999999999998`, 0}, {30.9, 
             0.024250440917107527`}]},
           
           ImageSizeCache->{{855.6005877551033, 864.9535346938789}, {
            198.0931985041208, 244.09732815676327`}}]},
         StatusArea[#, 0.024250440917107527`]& ,
         TagBoxNote->"0.024250440917107527"],
        StyleBox["0.024250440917107527`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024250440917107527`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{30.9, 0}, {31.2, 0.05070546737213392}]},
           
           ImageSizeCache->{{863.7535346938788, 873.1064816326544}, {
            149.2159661557836, 244.09732815676327`}}]},
         StatusArea[#, 0.05070546737213392]& ,
         TagBoxNote->"0.05070546737213392"],
        StyleBox["0.05070546737213392`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05070546737213392, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{31.2, 0}, {31.5, 0.030864197530864123`}]},
           
           ImageSizeCache->{{871.9064816326544, 881.25942857143}, {
            185.8738904170365, 244.09732815676327`}}]},
         StatusArea[#, 0.030864197530864123`]& ,
         TagBoxNote->"0.030864197530864123"],
        StyleBox["0.030864197530864123`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.030864197530864123`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.24720000000000017`, 0.24, 0.6], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{31.5, 0}, {31.799999999999997`, 
             0.013227513227513352`}]},
           
           ImageSizeCache->{{880.05942857143, 889.4123755102054}, {
            218.45871198259437`, 244.09732815676327`}}]},
         StatusArea[#, 0.013227513227513352`]& ,
         TagBoxNote->"0.013227513227513352"],
        StyleBox["0.013227513227513352`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.013227513227513352`, {
          GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}}, {{}, {{{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0., 0}, {0.3, 0.03278688524590164}]},
           
           ImageSizeCache->{{24., 33.35294693877552}, {182.32161068898785`, 
            244.09732815676327`}}]},
         StatusArea[#, 0.03278688524590164]& ,
         TagBoxNote->"0.03278688524590164"],
        StyleBox["0.03278688524590164`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03278688524590164, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.3, 0}, {0.6, 0.1639344262295082}]},
           
           ImageSizeCache->{{32.15294693877552, 
            41.505893877551046`}, {-59.98125918211372, 244.09732815676324`}}]},
         StatusArea[#, 0.1639344262295082]& ,
         TagBoxNote->"0.1639344262295082"],
        StyleBox["0.1639344262295082`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.1639344262295082, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{0.6, 0}, {0.8999999999999999, 
             0.10928961748633882`}]},
           
           ImageSizeCache->{{40.30589387755105, 49.65884081632656}, {
            40.978269930845244`, 244.09732815676327`}}]},
         StatusArea[#, 0.10928961748633882`]& ,
         TagBoxNote->"0.10928961748633882"],
        StyleBox["0.10928961748633882`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.10928961748633882`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.8999999999999999, 0}, {1.2, 0.08743169398907102}]},
           
           ImageSizeCache->{{48.458840816326564`, 57.81178775510209}, {
            81.36208157602891, 244.09732815676324`}}]},
         StatusArea[#, 0.08743169398907102]& ,
         TagBoxNote->"0.08743169398907102"],
        StyleBox["0.08743169398907102`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.08743169398907102, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.2, 0}, {1.5, 0.14207650273224043`}]},
           
           ImageSizeCache->{{56.61178775510209, 
            65.9647346938776}, {-19.597447536930076`, 244.09732815676324`}}]},
         StatusArea[#, 0.14207650273224043`]& ,
         TagBoxNote->"0.14207650273224043"],
        StyleBox["0.14207650273224043`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.14207650273224043`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{1.5, 0}, {1.7999999999999998`, 
             0.13114754098360665`}]},
           
           ImageSizeCache->{{64.76473469387761, 74.11768163265316}, {
            0.594458285661517, 244.09732815676324`}}]},
         StatusArea[#, 0.13114754098360665`]& ,
         TagBoxNote->"0.13114754098360665"],
        StyleBox["0.13114754098360665`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.13114754098360665`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.7999999999999998`, 0}, {2.1, 0.2295081967213113}]},
           
           ImageSizeCache->{{72.91768163265314, 
            82.27062857142867}, {-181.13269411766413`, 244.09732815676324`}}]},
         StatusArea[#, 0.2295081967213113]& ,
         TagBoxNote->"0.2295081967213113"],
        StyleBox["0.2295081967213113`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.2295081967213113, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.1, 0}, {2.4, 0.1530054644808744}]},
           
           ImageSizeCache->{{81.07062857142867, 
            90.42357551020422}, {-39.78935335952207, 244.09732815676324`}}]},
         StatusArea[#, 0.1530054644808744]& ,
         TagBoxNote->"0.1530054644808744"],
        StyleBox["0.1530054644808744`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.1530054644808744, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{2.4, 0}, {2.6999999999999997`, 
             0.22950819672131162`}]},
           
           ImageSizeCache->{{89.2235755102042, 
            98.5765224489797}, {-181.13269411766476`, 244.09732815676324`}}]},
         StatusArea[#, 0.22950819672131162`]& ,
         TagBoxNote->"0.22950819672131162"],
        StyleBox["0.22950819672131162`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.22950819672131162`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{2.6999999999999997`, 0}, {3., 
             0.13114754098360645`}]},
           
           ImageSizeCache->{{97.3765224489797, 106.72946938775524`}, {
            0.5944582856618865, 244.09732815676324`}}]},
         StatusArea[#, 0.13114754098360645`]& ,
         TagBoxNote->"0.13114754098360645"],
        StyleBox["0.13114754098360645`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.13114754098360645`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3., 0}, {3.3, 0.1420765027322405}]},
           
           ImageSizeCache->{{105.52946938775523`, 
            114.88241632653077`}, {-19.597447536930247`, 
            244.09732815676324`}}]},
         StatusArea[#, 0.1420765027322405]& ,
         TagBoxNote->"0.1420765027322405"],
        StyleBox["0.1420765027322405`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.1420765027322405, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.3, 0}, {3.5999999999999996`, 0.0874316939890711}]},
           
           ImageSizeCache->{{113.68241632653076`, 123.03536326530629`}, {
            81.36208157602877, 244.09732815676324`}}]},
         StatusArea[#, 0.0874316939890711]& ,
         TagBoxNote->"0.0874316939890711"],
        StyleBox["0.0874316939890711`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0874316939890711, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{3.5999999999999996`, 0}, {3.9, 
             0.07650273224043709}]},
           
           ImageSizeCache->{{121.83536326530628`, 131.1883102040818}, {
            101.55398739862079`, 244.09732815676324`}}]},
         StatusArea[#, 0.07650273224043709]& ,
         TagBoxNote->"0.07650273224043709"],
        StyleBox["0.07650273224043709`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07650273224043709, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.9, 0}, {4.2, 0.09836065573770483}]},
           
           ImageSizeCache->{{129.9883102040818, 139.34125714285733`}, {
            61.170175753437235`, 244.09732815676327`}}]},
         StatusArea[#, 0.09836065573770483]& ,
         TagBoxNote->"0.09836065573770483"],
        StyleBox["0.09836065573770483`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.09836065573770483, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.2, 0}, {4.5, 0.10928961748633886`}]},
           
           ImageSizeCache->{{138.14125714285734`, 147.49420408163286`}, {
            40.97826993084516, 244.09732815676324`}}]},
         StatusArea[#, 0.10928961748633886`]& ,
         TagBoxNote->"0.10928961748633886"],
        StyleBox["0.10928961748633886`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.10928961748633886`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.5, 0}, {4.8, 0.03278688524590166}]},
           
           ImageSizeCache->{{146.29420408163284`, 155.64715102040836`}, {
            182.3216106889878, 244.09732815676324`}}]},
         StatusArea[#, 0.03278688524590166]& ,
         TagBoxNote->"0.03278688524590166"],
        StyleBox["0.03278688524590166`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03278688524590166, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.8, 0}, {5.1, 0.04371584699453555}]},
           
           ImageSizeCache->{{154.44715102040837`, 163.80009795918386`}, {
            162.12970486639597`, 244.09732815676324`}}]},
         StatusArea[#, 0.04371584699453555]& ,
         TagBoxNote->"0.04371584699453555"],
        StyleBox["0.04371584699453555`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04371584699453555, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{5.1, 0}, {5.3999999999999995`, 
             0.06557377049180332}]},
           
           ImageSizeCache->{{162.60009795918387`, 171.9530448979594}, {
            121.74589322121237`, 244.09732815676324`}}]},
         StatusArea[#, 0.06557377049180332]& ,
         TagBoxNote->"0.06557377049180332"],
        StyleBox["0.06557377049180332`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06557377049180332, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{5.3999999999999995`, 0}, {5.7, 
             0.07650273224043698}]},
           
           ImageSizeCache->{{170.7530448979594, 180.10599183673494`}, {
            101.55398739862102`, 244.09732815676324`}}]},
         StatusArea[#, 0.07650273224043698]& ,
         TagBoxNote->"0.07650273224043698"],
        StyleBox["0.07650273224043698`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07650273224043698, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.7, 0}, {6., 0.010928961748633887`}]},
           
           ImageSizeCache->{{178.90599183673496`, 188.25893877551044`}, {
            222.70542233417143`, 244.09732815676324`}}]},
         StatusArea[#, 0.010928961748633887`]& ,
         TagBoxNote->"0.010928961748633887"],
        StyleBox["0.010928961748633887`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633887`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6., 0}, {6.3, 0.0765027322404372}]},
           
           ImageSizeCache->{{187.05893877551046`, 196.41188571428597`}, {
            101.55398739862059`, 244.09732815676324`}}]},
         StatusArea[#, 0.0765027322404372]& ,
         TagBoxNote->"0.0765027322404372"],
        StyleBox["0.0765027322404372`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0765027322404372, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.3, 0}, {6.6, 0.021857923497267773`}]},
           
           ImageSizeCache->{{195.21188571428598`, 204.5648326530615}, {
            202.5135165115796, 244.09732815676324`}}]},
         StatusArea[#, 0.021857923497267773`]& ,
         TagBoxNote->"0.021857923497267773"],
        StyleBox["0.021857923497267773`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267773`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{6.6, 0}, {6.8999999999999995`, 
             0.04371584699453555}]},
           
           ImageSizeCache->{{203.3648326530615, 212.717779591837}, {
            162.12970486639597`, 244.09732815676324`}}]},
         StatusArea[#, 0.04371584699453555]& ,
         TagBoxNote->"0.04371584699453555"],
        StyleBox["0.04371584699453555`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04371584699453555, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{6.8999999999999995`, 0}, {7.199999999999999, 
             0.0765027322404372}]},
           
           ImageSizeCache->{{211.517779591837, 220.87072653061253`}, {
            101.55398739862059`, 244.09732815676324`}}]},
         StatusArea[#, 0.0765027322404372]& ,
         TagBoxNote->"0.0765027322404372"],
        StyleBox["0.0765027322404372`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0765027322404372, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.199999999999999, 0}, {7.5, 0.06557377049180313}]},
           
           ImageSizeCache->{{219.67072653061254`, 229.02367346938806`}, {
            121.74589322121274`, 244.09732815676324`}}]},
         StatusArea[#, 0.06557377049180313]& ,
         TagBoxNote->"0.06557377049180313"],
        StyleBox["0.06557377049180313`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06557377049180313, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.5, 0}, {7.8, 0.010928961748633887`}]},
           ImageSizeCache->{{227.82367346938807`, 237.1766204081636}, {
            222.70542233417143`, 244.09732815676324`}}]},
         StatusArea[#, 0.010928961748633887`]& ,
         TagBoxNote->"0.010928961748633887"],
        StyleBox["0.010928961748633887`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633887`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.8, 0}, {8.1, 0.06557377049180332}]},
           
           ImageSizeCache->{{235.9766204081636, 245.32956734693911`}, {
            121.74589322121237`, 244.09732815676324`}}]},
         StatusArea[#, 0.06557377049180332]& ,
         TagBoxNote->"0.06557377049180332"],
        StyleBox["0.06557377049180332`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06557377049180332, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.1, 0}, {8.4, 0.10928961748633854`}]},
           
           ImageSizeCache->{{244.12956734693913`, 253.48251428571467`}, {
            40.978269930845755`, 244.09732815676327`}}]},
         StatusArea[#, 0.10928961748633854`]& ,
         TagBoxNote->"0.10928961748633854"],
        StyleBox["0.10928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.10928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.4, 0}, {8.7, 0.03278688524590176}]},
           
           ImageSizeCache->{{252.28251428571463`, 261.6354612244902}, {
            182.3216106889876, 244.09732815676327`}}]},
         StatusArea[#, 0.03278688524590176]& ,
         TagBoxNote->"0.03278688524590176"],
        StyleBox["0.03278688524590176`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03278688524590176, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.7, 0}, {9., 0.05464480874316927}]},
           
           ImageSizeCache->{{260.43546122449015`, 269.7884081632657}, {
            141.93779904380446`, 244.09732815676327`}}]},
         StatusArea[#, 0.05464480874316927]& ,
         TagBoxNote->"0.05464480874316927"],
        StyleBox["0.05464480874316927`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05464480874316927, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9., 0}, {9.299999999999999, 0.03278688524590176}]},
           
           ImageSizeCache->{{268.5884081632657, 277.94135510204114`}, {
            182.3216106889876, 244.09732815676327`}}]},
         StatusArea[#, 0.03278688524590176]& ,
         TagBoxNote->"0.03278688524590176"],
        StyleBox["0.03278688524590176`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03278688524590176, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{9.299999999999999, 0}, {9.6, 
             0.043715846994535415`}]},
           
           ImageSizeCache->{{276.74135510204115`, 286.09430204081673`}, {
            162.12970486639622`, 244.09732815676327`}}]},
         StatusArea[#, 0.043715846994535415`]& ,
         TagBoxNote->"0.043715846994535415"],
        StyleBox["0.043715846994535415`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.043715846994535415`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.6, 0}, {9.9, 0.021857923497267708`}]},
           
           ImageSizeCache->{{284.89430204081674`, 294.24724897959226`}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.9, 0}, {10.2, 0.03278688524590176}]},
           
           ImageSizeCache->{{293.04724897959227`, 302.40019591836773`}, {
            182.3216106889876, 244.09732815676327`}}]},
         StatusArea[#, 0.03278688524590176]& ,
         TagBoxNote->"0.03278688524590176"],
        StyleBox["0.03278688524590176`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03278688524590176, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.2, 0}, {10.5, 0.032786885245901565`}]},
           
           ImageSizeCache->{{301.20019591836774`, 310.5531428571433}, {
            182.32161068898793`, 244.09732815676327`}}]},
         StatusArea[#, 0.032786885245901565`]& ,
         TagBoxNote->"0.032786885245901565"],
        StyleBox["0.032786885245901565`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.032786885245901565`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{10.5, 0}, {10.799999999999999`, 
             0.021857923497267836`}]},
           
           ImageSizeCache->{{309.3531428571433, 318.7060897959188}, {
            202.51351651157947`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267836`]& ,
         TagBoxNote->"0.021857923497267836"],
        StyleBox["0.021857923497267836`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267836`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{10.799999999999999`, 0}, {11.1, 
             0.021857923497267708`}]},
           
           ImageSizeCache->{{317.5060897959188, 326.8590367346943}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.1, 0}, {11.4, 0.021857923497267708`}]},
           
           ImageSizeCache->{{325.6590367346943, 335.0119836734699}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.7, 0}, {12., 0.010928961748633854`}]},
           
           ImageSizeCache->{{341.9649306122454, 351.3178775510209}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{12., 0}, {12.299999999999999`, 
             0.021857923497267836`}]},
           
           ImageSizeCache->{{350.1178775510209, 359.4708244897964}, {
            202.51351651157947`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267836`]& ,
         TagBoxNote->"0.021857923497267836"],
        StyleBox["0.021857923497267836`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267836`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.6, 0}, {12.9, 0.021857923497267708`}]},
           
           ImageSizeCache->{{366.42377142857197`, 375.7767183673475}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.9, 0}, {13.2, 0.010928961748633918`}]},
           
           ImageSizeCache->{{374.5767183673475, 383.929665306123}, {
            222.70542233417135`, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633918`]& ,
         TagBoxNote->"0.010928961748633918"],
        StyleBox["0.010928961748633918`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633918`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13.2, 0}, {13.5, 0.021857923497267708`}]},
           
           ImageSizeCache->{{382.729665306123, 392.08261224489854`}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{13.5, 0}, {13.799999999999999`, 
             0.021857923497267836`}]},
           
           ImageSizeCache->{{390.88261224489855`, 400.235559183674}, {
            202.51351651157947`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267836`]& ,
         TagBoxNote->"0.021857923497267836"],
        StyleBox["0.021857923497267836`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267836`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{13.799999999999999`, 0}, {14.1, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{399.035559183674, 408.38850612244954`}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{14.1, 0}, {14.399999999999999`, 
             0.021857923497267836`}]},
           
           ImageSizeCache->{{407.18850612244955`, 416.54145306122507`}, {
            202.51351651157947`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267836`]& ,
         TagBoxNote->"0.021857923497267836"],
        StyleBox["0.021857923497267836`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267836`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{14.399999999999999`, 0}, {14.7, 
             0.021857923497267708`}]},
           
           ImageSizeCache->{{415.3414530612251, 424.6944000000006}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14.7, 0}, {15., 0.032786885245901565`}]},
           
           ImageSizeCache->{{423.4944000000006, 432.8473469387761}, {
            182.32161068898793`, 244.09732815676327`}}]},
         StatusArea[#, 0.032786885245901565`]& ,
         TagBoxNote->"0.032786885245901565"],
        StyleBox["0.032786885245901565`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.032786885245901565`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15., 0}, {15.299999999999999`, 
             0.021857923497267836`}]},
           
           ImageSizeCache->{{431.64734693877614`, 441.00029387755166`}, {
            202.51351651157947`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267836`]& ,
         TagBoxNote->"0.021857923497267836"],
        StyleBox["0.021857923497267836`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267836`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15.299999999999999`, 0}, {15.6, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{439.80029387755167`, 449.1532408163272}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{15.899999999999999`, 0}, {16.2, 
             0.021857923497267708`}]},
           
           ImageSizeCache->{{456.10618775510267`, 465.45913469387824`}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16.2, 0}, {16.5, 0.021857923497267708`}]},
           
           ImageSizeCache->{{464.25913469387825`, 473.61208163265377`}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16.5, 0}, {16.8, 0.010928961748633854`}]},
           
           ImageSizeCache->{{472.4120816326538, 481.7650285714293}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.099999999999998`, 0}, {17.4, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{488.7179755102048, 498.0709224489803}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.4, 0}, {17.7, 0.010928961748633854`}]},
           
           ImageSizeCache->{{496.8709224489803, 506.2238693877558}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18., 0}, {18.3, 0.021857923497267708`}]},
           
           ImageSizeCache->{{513.1768163265314, 522.529763265307}, {
            202.5135165115797, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267708`]& ,
         TagBoxNote->"0.021857923497267708"],
        StyleBox["0.021857923497267708`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267708`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{18.3, 0}, {18.599999999999998`, 
             0.021857923497267968`}]},
           
           ImageSizeCache->{{521.329763265307, 530.6827102040824}, {
            202.51351651157924`, 244.09732815676327`}}]},
         StatusArea[#, 0.021857923497267968`]& ,
         TagBoxNote->"0.021857923497267968"],
        StyleBox["0.021857923497267968`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021857923497267968`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{18.599999999999998`, 0}, {18.9, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{529.4827102040823, 538.8356571428579}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{20.099999999999998`, 0}, {20.4, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{570.24744489796, 579.6003918367355}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{21., 0}, {21.3, 0.010928961748633854`}]},
           
           ImageSizeCache->{{594.7062857142867, 604.0592326530622}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.6, 0.24, 0.4428931686004542], Opacity[0.5], EdgeForm[
          Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            
            RectangleBox[{23.099999999999998`, 0}, {23.4, 
             0.010928961748633854`}]},
           
           ImageSizeCache->{{651.7769142857152, 661.1298612244908}, {
            222.7054223341715, 244.09732815676327`}}]},
         StatusArea[#, 0.010928961748633854`]& ,
         TagBoxNote->"0.010928961748633854"],
        StyleBox["0.010928961748633854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.010928961748633854`, {
          GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesOrigin->{0., 0},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  ImageSize->{715.000000000001, Automatic},
  PlotRange->{{0, 30}, {0, 0.25}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.1]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.50425465846875*^9, 3.504254776921875*^9, {3.504254830125*^9, 
   3.504254835140625*^9}, {3.504255352046875*^9, 3.504255359765625*^9}, {
   3.5042554099375*^9, 3.50425544975*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{"h2", ",", "h1", ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0", ",", "30"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0.5"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.50374396746875*^9, 3.503743972078125*^9}, 
   3.503787069171875*^9, 3.503805623234375*^9, {3.5038070661875*^9, 
   3.503807070734375*^9}, {3.50381195775*^9, 3.503811997625*^9}, {
   3.50382240778125*^9, 3.50382241728125*^9}, {3.5042208534375*^9, 
   3.504220865921875*^9}, {3.504254245296875*^9, 3.504254260640625*^9}, {
   3.504254575125*^9, 3.504254611703125*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {{{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2., 0}, {2.5, 0.0014154281670205238`}]},
           
           ImageSizeCache->{{70.98384000000001, 85.79600000000003}, {
            242.4927792912072, 245.00262434348346`}}]},
         StatusArea[#, 0.0014154281670205238`]& ,
         TagBoxNote->"0.0014154281670205238"],
        StyleBox["0.0014154281670205238`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0014154281670205238`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.5, 0}, {3., 0.007077140835102618}]},
           
           ImageSizeCache->{{84.59600000000003, 99.40816000000002}, {
            237.25339908210205`, 245.00262434348346`}}]},
         StatusArea[#, 0.007077140835102618]& ,
         TagBoxNote->"0.007077140835102618"],
        StyleBox["0.007077140835102618`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.007077140835102618, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3., 0}, {3.5, 0.024062278839348902`}]},
           
           ImageSizeCache->{{98.20816000000002, 113.02032000000004`}, {
            221.53525845478666`, 245.00262434348346`}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.5, 0}, {4., 0.0537862703467799}]},
           
           ImageSizeCache->{{111.82032000000004`, 126.63248000000003`}, {
            194.02851235698466`, 245.00262434348346`}}]},
         StatusArea[#, 0.0537862703467799]& ,
         TagBoxNote->"0.0537862703467799"],
        StyleBox["0.0537862703467799`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0537862703467799, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4., 0}, {4.5, 0.07077140835102619}]},
           
           ImageSizeCache->{{125.43248000000003`, 140.24464000000003`}, {
            178.31037172966927`, 245.00262434348346`}}]},
         StatusArea[#, 0.07077140835102619]& ,
         TagBoxNote->"0.07077140835102619"],
        StyleBox["0.07077140835102619`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07077140835102619, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.5, 0}, {5., 0.056617126680820945`}]},
           
           ImageSizeCache->{{139.04464000000004`, 153.85680000000002`}, {
            191.40882225243212`, 245.00262434348346`}}]},
         StatusArea[#, 0.056617126680820945`]& ,
         TagBoxNote->"0.056617126680820945"],
        StyleBox["0.056617126680820945`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.056617126680820945`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5., 0}, {5.5, 0.02689313517338995}]},
           
           ImageSizeCache->{{152.65680000000003`, 167.46896}, {
            218.91556835023408`, 245.00262434348346`}}]},
         StatusArea[#, 0.02689313517338995]& ,
         TagBoxNote->"0.02689313517338995"],
        StyleBox["0.02689313517338995`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02689313517338995, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.5, 0}, {6., 0.03113941967445152}]},
           
           ImageSizeCache->{{166.26896000000002`, 181.08112000000003`}, {
            214.98603319340523`, 245.00262434348346`}}]},
         StatusArea[#, 0.03113941967445152]& ,
         TagBoxNote->"0.03113941967445152"],
        StyleBox["0.03113941967445152`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03113941967445152, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6., 0}, {6.5, 0.02264685067232838}]},
           
           ImageSizeCache->{{179.88112000000004`, 194.69328000000004`}, {
            222.84510350706293`, 245.00262434348346`}}]},
         StatusArea[#, 0.02264685067232838]& ,
         TagBoxNote->"0.02264685067232838"],
        StyleBox["0.02264685067232838`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02264685067232838, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.5, 0}, {7., 0.01556970983722576}]},
           
           ImageSizeCache->{{193.49328000000006`, 208.30544000000003`}, {
            229.39432876844435`, 245.00262434348346`}}]},
         StatusArea[#, 0.01556970983722576]& ,
         TagBoxNote->"0.01556970983722576"],
        StyleBox["0.01556970983722576`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01556970983722576, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7., 0}, {7.5, 0.05803255484784147}]},
           
           ImageSizeCache->{{207.10544000000004`, 221.91760000000002`}, {
            190.0989772001558, 245.00262434348346`}}]},
         StatusArea[#, 0.05803255484784147]& ,
         TagBoxNote->"0.05803255484784147"],
        StyleBox["0.05803255484784147`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05803255484784147, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.5, 0}, {8., 0.04104741684359519}]},
           
           ImageSizeCache->{{220.71760000000003`, 235.52976000000004`}, {
            205.81711782747124`, 245.00262434348346`}}]},
         StatusArea[#, 0.04104741684359519]& ,
         TagBoxNote->"0.04104741684359519"],
        StyleBox["0.04104741684359519`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04104741684359519, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8., 0}, {8.5, 0.052370842179759375`}]},
           
           ImageSizeCache->{{234.32976000000005`, 249.14192000000006`}, {
            195.33835740926094`, 245.00262434348346`}}]},
         StatusArea[#, 0.052370842179759375`]& ,
         TagBoxNote->"0.052370842179759375"],
        StyleBox["0.052370842179759375`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.052370842179759375`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.5, 0}, {9., 0.024062278839348902`}]},
           
           ImageSizeCache->{{247.94192000000004`, 262.7540800000001}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9., 0}, {9.5, 0.03680113234253362}]},
           
           ImageSizeCache->{{261.55408000000006`, 276.36624}, {
            209.74665298430003`, 245.0026243434835}}]},
         StatusArea[#, 0.03680113234253362]& ,
         TagBoxNote->"0.03680113234253362"],
        StyleBox["0.03680113234253362`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03680113234253362, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.5, 0}, {10., 0.04529370134465676}]},
           
           ImageSizeCache->{{275.16624, 289.9784}, {201.88758267064233`, 
            245.0026243434835}}]},
         StatusArea[#, 0.04529370134465676]& ,
         TagBoxNote->"0.04529370134465676"],
        StyleBox["0.04529370134465676`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04529370134465676, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10., 0}, {10.5, 0.07501769285208776}]},
           
           ImageSizeCache->{{288.77840000000003`, 303.59056000000004`}, {
            174.38083657284037`, 245.0026243434835}}]},
         StatusArea[#, 0.07501769285208776]& ,
         TagBoxNote->"0.07501769285208776"],
        StyleBox["0.07501769285208776`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07501769285208776, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{10.5, 0}, {11., 0.043878273177636234`}]},
           
           ImageSizeCache->{{302.39056000000005`, 317.20272}, {
            203.1974277229186, 245.0026243434835}}]},
         StatusArea[#, 0.043878273177636234`]& ,
         TagBoxNote->"0.043878273177636234"],
        StyleBox["0.043878273177636234`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.043878273177636234`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11., 0}, {11.5, 0.05803255484784147}]},
           
           ImageSizeCache->{{316.00272, 330.81488}, {190.09897720015576`, 
            245.0026243434835}}]},
         StatusArea[#, 0.05803255484784147]& ,
         TagBoxNote->"0.05803255484784147"],
        StyleBox["0.05803255484784147`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05803255484784147, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{11.5, 0}, {12., 0.06510969568294409}]},
           
           ImageSizeCache->{{329.61488, 344.42704000000003`}, {
            183.5497519387744, 245.0026243434835}}]},
         StatusArea[#, 0.06510969568294409]& ,
         TagBoxNote->"0.06510969568294409"],
        StyleBox["0.06510969568294409`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06510969568294409, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12., 0}, {12.5, 0.09200283085633404}]},
           
           ImageSizeCache->{{343.22704000000004`, 358.03920000000005`}, {
            158.66269594552497`, 245.0026243434835}}]},
         StatusArea[#, 0.09200283085633404]& ,
         TagBoxNote->"0.09200283085633404"],
        StyleBox["0.09200283085633404`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.09200283085633404, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{12.5, 0}, {13., 0.04953998584571833}]},
           
           ImageSizeCache->{{356.83920000000006`, 371.65136000000007`}, {
            197.9580475138135, 245.0026243434835}}]},
         StatusArea[#, 0.04953998584571833]& ,
         TagBoxNote->"0.04953998584571833"],
        StyleBox["0.04953998584571833`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04953998584571833, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13., 0}, {13.5, 0.0835102618542109}]},
           
           ImageSizeCache->{{370.4513600000001, 385.26352}, {
            166.52176625918267`, 245.0026243434835}}]},
         StatusArea[#, 0.0835102618542109]& ,
         TagBoxNote->"0.0835102618542109"],
        StyleBox["0.0835102618542109`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.0835102618542109, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{13.5, 0}, {14., 0.06369426751592357}]},
           ImageSizeCache->{{384.06352000000004`, 398.87568000000005`}, {
            184.85959699105067`, 245.0026243434835}}]},
         StatusArea[#, 0.06369426751592357]& ,
         TagBoxNote->"0.06369426751592357"],
        StyleBox["0.06369426751592357`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06369426751592357, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14., 0}, {14.5, 0.05803255484784147}]},
           
           ImageSizeCache->{{397.67568000000006`, 412.48784000000006`}, {
            190.09897720015576`, 245.0026243434835}}]},
         StatusArea[#, 0.05803255484784147]& ,
         TagBoxNote->"0.05803255484784147"],
        StyleBox["0.05803255484784147`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05803255484784147, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{14.5, 0}, {15., 0.048124557678697805`}]},
           
           ImageSizeCache->{{411.2878400000001, 426.1}, {199.26789256608978`, 
            245.0026243434835}}]},
         StatusArea[#, 0.048124557678697805`]& ,
         TagBoxNote->"0.048124557678697805"],
        StyleBox["0.048124557678697805`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.048124557678697805`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{15., 0}, {15.5, 0.052370842179759375`}]},
           
           ImageSizeCache->{{424.90000000000003`, 439.71216000000004`}, {
            195.3383574092609, 245.0026243434835}}]},
         StatusArea[#, 0.052370842179759375`]& ,
         TagBoxNote->"0.052370842179759375"],
        StyleBox["0.052370842179759375`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.052370842179759375`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{15.5, 0}, {16., 0.03680113234253362}]},
           
           ImageSizeCache->{{438.51216000000005`, 453.32432000000006`}, {
            209.74665298430003`, 245.0026243434835}}]},
         StatusArea[#, 0.03680113234253362]& ,
         TagBoxNote->"0.03680113234253362"],
        StyleBox["0.03680113234253362`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03680113234253362, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16., 0}, {16.5, 0.028308563340410473`}]},
           
           ImageSizeCache->{{452.12432000000007`, 466.9364800000001}, {
            217.60572329795775`, 245.0026243434835}}]},
         StatusArea[#, 0.028308563340410473`]& ,
         TagBoxNote->"0.028308563340410473"],
        StyleBox["0.028308563340410473`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.028308563340410473`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{16.5, 0}, {17., 0.024062278839348902`}]},
           
           ImageSizeCache->{{465.7364800000001, 480.5486400000001}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17., 0}, {17.5, 0.024062278839348902`}]},
           
           ImageSizeCache->{{479.3486400000001, 494.16080000000005`}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{17.5, 0}, {18., 0.029723991507430998`}]},
           
           ImageSizeCache->{{492.96080000000006`, 507.77296000000007`}, {
            216.29587824568148`, 245.0026243434835}}]},
         StatusArea[#, 0.029723991507430998`]& ,
         TagBoxNote->"0.029723991507430998"],
        StyleBox["0.029723991507430998`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.029723991507430998`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18., 0}, {18.5, 0.024062278839348902`}]},
           
           ImageSizeCache->{{506.5729600000001, 521.3851200000001}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{18.5, 0}, {19., 0.029723991507430998`}]},
           
           ImageSizeCache->{{520.1851200000001, 534.9972800000002}, {
            216.29587824568148`, 245.0026243434835}}]},
         StatusArea[#, 0.029723991507430998`]& ,
         TagBoxNote->"0.029723991507430998"],
        StyleBox["0.029723991507430998`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.029723991507430998`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19., 0}, {19.5, 0.029723991507430998`}]},
           
           ImageSizeCache->{{533.7972800000001, 548.6094400000002}, {
            216.29587824568148`, 245.0026243434835}}]},
         StatusArea[#, 0.029723991507430998`]& ,
         TagBoxNote->"0.029723991507430998"],
        StyleBox["0.029723991507430998`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.029723991507430998`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{19.5, 0}, {20., 0.02689313517338995}]},
           
           ImageSizeCache->{{547.4094400000001, 562.2216000000002}, {
            218.91556835023405`, 245.0026243434835}}]},
         StatusArea[#, 0.02689313517338995]& ,
         TagBoxNote->"0.02689313517338995"],
        StyleBox["0.02689313517338995`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02689313517338995, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{20., 0}, {20.5, 0.03113941967445152}]},
           
           ImageSizeCache->{{561.0216000000001, 575.8337600000002}, {
            214.9860331934052, 245.0026243434835}}]},
         StatusArea[#, 0.03113941967445152]& ,
         TagBoxNote->"0.03113941967445152"],
        StyleBox["0.03113941967445152`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.03113941967445152, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{20.5, 0}, {21., 0.04529370134465676}]},
           
           ImageSizeCache->{{574.6337600000002, 589.4459200000002}, {
            201.88758267064233`, 245.0026243434835}}]},
         StatusArea[#, 0.04529370134465676]& ,
         TagBoxNote->"0.04529370134465676"],
        StyleBox["0.04529370134465676`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.04529370134465676, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{21., 0}, {21.5, 0.019815994338287332`}]},
           
           ImageSizeCache->{{588.2459200000002, 603.0580800000002}, {
            225.46479361161548`, 245.0026243434835}}]},
         StatusArea[#, 0.019815994338287332`]& ,
         TagBoxNote->"0.019815994338287332"],
        StyleBox["0.019815994338287332`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019815994338287332`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{21.5, 0}, {22., 0.019815994338287332`}]},
           
           ImageSizeCache->{{601.8580800000002, 616.6702400000001}, {
            225.46479361161548`, 245.0026243434835}}]},
         StatusArea[#, 0.019815994338287332`]& ,
         TagBoxNote->"0.019815994338287332"],
        StyleBox["0.019815994338287332`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019815994338287332`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{22., 0}, {22.5, 0.008492569002123142}]},
           
           ImageSizeCache->{{615.4702400000001, 630.2824000000002}, {
            235.94355402982575`, 245.0026243434835}}]},
         StatusArea[#, 0.008492569002123142]& ,
         TagBoxNote->"0.008492569002123142"],
        StyleBox["0.008492569002123142`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.008492569002123142, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{22.5, 0}, {23., 0.014154281670205236`}]},
           
           ImageSizeCache->{{629.0824000000001, 643.8945600000002}, {
            230.7041738207206, 245.0026243434835}}]},
         StatusArea[#, 0.014154281670205236`]& ,
         TagBoxNote->"0.014154281670205236"],
        StyleBox["0.014154281670205236`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.014154281670205236`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{23., 0}, {23.5, 0.019815994338287332`}]},
           
           ImageSizeCache->{{642.6945600000001, 657.5067200000002}, {
            225.46479361161548`, 245.0026243434835}}]},
         StatusArea[#, 0.019815994338287332`]& ,
         TagBoxNote->"0.019815994338287332"],
        StyleBox["0.019815994338287332`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.019815994338287332`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{23.5, 0}, {24., 0.029723991507430998`}]},
           
           ImageSizeCache->{{656.3067200000002, 671.1188800000002}, {
            216.29587824568148`, 245.0026243434835}}]},
         StatusArea[#, 0.029723991507430998`]& ,
         TagBoxNote->"0.029723991507430998"],
        StyleBox["0.029723991507430998`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.029723991507430998`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{24., 0}, {24.5, 0.024062278839348902`}]},
           
           ImageSizeCache->{{669.9188800000002, 684.7310400000002}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{24.5, 0}, {25., 0.024062278839348902`}]},
           
           ImageSizeCache->{{683.5310400000002, 698.3432000000003}, {
            221.53525845478663`, 245.0026243434835}}]},
         StatusArea[#, 0.024062278839348902`]& ,
         TagBoxNote->"0.024062278839348902"],
        StyleBox["0.024062278839348902`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.024062278839348902`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{25., 0}, {25.5, 0.025477707006369428`}]},
           
           ImageSizeCache->{{697.1432000000002, 711.9553600000003}, {
            220.22541340251033`, 245.0026243434835}}]},
         StatusArea[#, 0.025477707006369428`]& ,
         TagBoxNote->"0.025477707006369428"],
        StyleBox["0.025477707006369428`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.025477707006369428`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{25.5, 0}, {26., 0.021231422505307854`}]},
           
           ImageSizeCache->{{710.7553600000002, 725.5675200000003}, {
            224.15494855933918`, 245.0026243434835}}]},
         StatusArea[#, 0.021231422505307854`]& ,
         TagBoxNote->"0.021231422505307854"],
        StyleBox["0.021231422505307854`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.021231422505307854`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{26., 0}, {26.5, 0.029723991507430998`}]},
           
           ImageSizeCache->{{724.3675200000002, 739.1796800000002}, {
            216.29587824568148`, 245.0026243434835}}]},
         StatusArea[#, 0.029723991507430998`]& ,
         TagBoxNote->"0.029723991507430998"],
        StyleBox["0.029723991507430998`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.029723991507430998`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{26.5, 0}, {27., 0.039631988676574664`}]},
           
           ImageSizeCache->{{737.9796800000001, 752.7918400000002}, {
            207.12696287974748`, 245.0026243434835}}]},
         StatusArea[#, 0.039631988676574664`]& ,
         TagBoxNote->"0.039631988676574664"],
        StyleBox["0.039631988676574664`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.039631988676574664`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{27., 0}, {27.5, 0.028308563340410473`}]},
           
           ImageSizeCache->{{751.5918400000002, 766.4040000000002}, {
            217.60572329795775`, 245.0026243434835}}]},
         StatusArea[#, 0.028308563340410473`]& ,
         TagBoxNote->"0.028308563340410473"],
        StyleBox["0.028308563340410473`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.028308563340410473`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{27.5, 0}, {28., 0.025477707006369428`}]},
           
           ImageSizeCache->{{765.2040000000002, 780.0161600000002}, {
            220.22541340251033`, 245.0026243434835}}]},
         StatusArea[#, 0.025477707006369428`]& ,
         TagBoxNote->"0.025477707006369428"],
        StyleBox["0.025477707006369428`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.025477707006369428`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{28., 0}, {28.5, 0.01132342533616419}]},
           
           ImageSizeCache->{{778.8161600000002, 793.6283200000003}, {
            233.32386392527317`, 245.0026243434835}}]},
         StatusArea[#, 0.01132342533616419]& ,
         TagBoxNote->"0.01132342533616419"],
        StyleBox["0.01132342533616419`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.01132342533616419, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{28.5, 0}, {29., 0.016985138004246284`}]},
           
           ImageSizeCache->{{792.4283200000002, 807.2404800000003}, {
            228.08448371616805`, 245.0026243434835}}]},
         StatusArea[#, 0.016985138004246284`]& ,
         TagBoxNote->"0.016985138004246284"],
        StyleBox["0.016985138004246284`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.016985138004246284`, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{29., 0}, {29.5, 0.02689313517338995}]},
           
           ImageSizeCache->{{806.0404800000002, 820.8526400000003}, {
            218.91556835023405`, 245.0026243434835}}]},
         StatusArea[#, 0.02689313517338995]& ,
         TagBoxNote->"0.02689313517338995"],
        StyleBox["0.02689313517338995`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.02689313517338995, {
          GrayLevel[0]}], "Tooltip"]& ]}, {{}, 
      TagBox[
       TooltipBox[
        TagBox[
         {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], 
          EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{29.5, 0}, {30., 0.028308563340410473`}]},
           
           ImageSizeCache->{{819.6526400000002, 834.4648000000002}, {
            217.60572329795775`, 245.0026243434835}}]},
         StatusArea[#, 0.028308563340410473`]& ,
         TagBoxNote->"0.028308563340410473"],
        StyleBox["0.028308563340410473`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.028308563340410473`, {
          GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}}, {{}, {
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0., 0}, {0.5, 0.10852713178294573`}]},
           
           ImageSizeCache->{{16.535200000000003`, 31.347360000000005`}, {
            143.37101649802048`, 245.00262434348346`}}]},
         StatusArea[#, 0.10852713178294573`]& ,
         TagBoxNote->"0.10852713178294573"],
        StyleBox["0.10852713178294573`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.10852713178294573`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{0.5, 0}, {1., 0.13953488372093023`}]},
           
           ImageSizeCache->{{30.147360000000006`, 44.95952000000001}, {
            114.67627139931679`, 245.00262434348346`}}]},
         StatusArea[#, 0.13953488372093023`]& ,
         TagBoxNote->"0.13953488372093023"],
        StyleBox["0.13953488372093023`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.13953488372093023`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1., 0}, {1.5, 0.13178294573643412`}]},
           
           ImageSizeCache->{{43.75952000000001, 58.571680000000015`}, {
            121.84995767399268`, 245.00262434348346`}}]},
         StatusArea[#, 0.13178294573643412`]& ,
         TagBoxNote->"0.13178294573643412"],
        StyleBox["0.13178294573643412`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.13178294573643412`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{1.5, 0}, {2., 0.20930232558139536`}]},
           
           ImageSizeCache->{{57.37168000000001, 72.18384}, {50.11309492723342,
             245.0026243434835}}]},
         StatusArea[#, 0.20930232558139536`]& ,
         TagBoxNote->"0.20930232558139536"],
        StyleBox["0.20930232558139536`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.20930232558139536`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2., 0}, {2.5, 0.2248062015503876}]},
           
           ImageSizeCache->{{70.98384000000001, 85.79600000000005}, {
            35.76572237788159, 245.00262434348346`}}]},
         StatusArea[#, 0.2248062015503876]& ,
         TagBoxNote->"0.2248062015503876"],
        StyleBox["0.2248062015503876`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.2248062015503876, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{2.5, 0}, {3., 0.18604651162790697`}]},
           
           ImageSizeCache->{{84.59600000000003, 99.40816000000002}, {
            71.63415375126124, 245.00262434348346`}}]},
         StatusArea[#, 0.18604651162790697`]& ,
         TagBoxNote->"0.18604651162790697"],
        StyleBox["0.18604651162790697`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.18604651162790697`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3., 0}, {3.5, 0.15503875968992248`}]},
           
           ImageSizeCache->{{98.20816000000002, 113.02032000000004`}, {
            100.32889884996493`, 245.00262434348346`}}]},
         StatusArea[#, 0.15503875968992248`]& ,
         TagBoxNote->"0.15503875968992248"],
        StyleBox["0.15503875968992248`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.15503875968992248`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{3.5, 0}, {4., 0.06976744186046512}]},
           
           ImageSizeCache->{{111.82032000000004`, 126.63248000000003`}, {
            179.2394478714001, 245.00262434348346`}}]},
         StatusArea[#, 0.06976744186046512]& ,
         TagBoxNote->"0.06976744186046512"],
        StyleBox["0.06976744186046512`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06976744186046512, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4., 0}, {4.5, 0.13953488372093023`}]},
           ImageSizeCache->{{125.43248000000003`, 140.24464000000003`}, {
            114.67627139931679`, 245.00262434348346`}}]},
         StatusArea[#, 0.13953488372093023`]& ,
         TagBoxNote->"0.13953488372093023"],
        StyleBox["0.13953488372093023`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.13953488372093023`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{4.5, 0}, {5., 0.046511627906976744`}]},
           
           ImageSizeCache->{{139.04464000000004`, 153.85680000000002`}, {
            200.76050669542792`, 245.00262434348346`}}]},
         StatusArea[#, 0.046511627906976744`]& ,
         TagBoxNote->"0.046511627906976744"],
        StyleBox["0.046511627906976744`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.046511627906976744`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5., 0}, {5.5, 0.06201550387596899}]},
           
           ImageSizeCache->{{152.65680000000003`, 167.46896}, {
            186.41313414607606`, 245.00262434348346`}}]},
         StatusArea[#, 0.06201550387596899]& ,
         TagBoxNote->"0.06201550387596899"],
        StyleBox["0.06201550387596899`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06201550387596899, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{5.5, 0}, {6., 0.05426356589147287}]},
           
           ImageSizeCache->{{166.26896000000002`, 181.08112000000003`}, {
            193.58682042075196`, 245.00262434348346`}}]},
         StatusArea[#, 0.05426356589147287]& ,
         TagBoxNote->"0.05426356589147287"],
        StyleBox["0.05426356589147287`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05426356589147287, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6., 0}, {6.5, 0.06976744186046512}]},
           
           ImageSizeCache->{{179.88112000000004`, 194.69328000000004`}, {
            179.2394478714001, 245.00262434348346`}}]},
         StatusArea[#, 0.06976744186046512]& ,
         TagBoxNote->"0.06976744186046512"],
        StyleBox["0.06976744186046512`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.06976744186046512, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{6.5, 0}, {7., 0.07751937984496124}]},
           
           ImageSizeCache->{{193.49328000000006`, 208.30544000000003`}, {
            172.0657615967242, 245.00262434348346`}}]},
         StatusArea[#, 0.07751937984496124]& ,
         TagBoxNote->"0.07751937984496124"],
        StyleBox["0.07751937984496124`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.07751937984496124, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7., 0}, {7.5, 0.05426356589147287}]},
           
           ImageSizeCache->{{207.10544000000004`, 221.91760000000002`}, {
            193.58682042075196`, 245.00262434348346`}}]},
         StatusArea[#, 0.05426356589147287]& ,
         TagBoxNote->"0.05426356589147287"],
        StyleBox["0.05426356589147287`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05426356589147287, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{7.5, 0}, {8., 0.031007751937984496`}]},
           
           ImageSizeCache->{{220.71760000000003`, 235.52976000000004`}, {
            215.10787924477975`, 245.00262434348346`}}]},
         StatusArea[#, 0.031007751937984496`]& ,
         TagBoxNote->"0.031007751937984496"],
        StyleBox["0.031007751937984496`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.031007751937984496`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8., 0}, {8.5, 0.10852713178294573`}]},
           
           ImageSizeCache->{{234.32976000000005`, 249.14192000000006`}, {
            143.37101649802048`, 245.00262434348346`}}]},
         StatusArea[#, 0.10852713178294573`]& ,
         TagBoxNote->"0.10852713178294573"],
        StyleBox["0.10852713178294573`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.10852713178294573`, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{8.5, 0}, {9., 0.05426356589147287}]},
           ImageSizeCache->{{247.94192000000004`, 262.7540800000001}, {
            193.58682042075193`, 245.0026243434835}}]},
         StatusArea[#, 0.05426356589147287]& ,
         TagBoxNote->"0.05426356589147287"],
        StyleBox["0.05426356589147287`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05426356589147287, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9., 0}, {9.5, 0.05426356589147287}]},
           
           ImageSizeCache->{{261.55408000000006`, 276.36624}, {
            193.58682042075193`, 245.0026243434835}}]},
         StatusArea[#, 0.05426356589147287]& ,
         TagBoxNote->"0.05426356589147287"],
        StyleBox["0.05426356589147287`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.05426356589147287, {
          GrayLevel[0]}], "Tooltip"]& ]}, 
     {GrayLevel[0], 
      TagBox[
       TooltipBox[
        TagBox[
         {GrayLevel[0], EdgeForm[Opacity[0.7]], 
          DynamicBox[{
            FrontEnd`If[
             CurrentValue["MouseOver"], 
             EdgeForm[{
               GrayLevel[0.5], 
               AbsoluteThickness[1.5], 
               Opacity[0.66]}], {}, {}], 
            RectangleBox[{9.5, 0}, {10., 0.023255813953488372`}]},
           
           ImageSizeCache->{{275.16624, 289.9784}, {222.28156551945565`, 
            245.0026243434835}}]},
         StatusArea[#, 0.023255813953488372`]& ,
         TagBoxNote->"0.023255813953488372"],
        StyleBox["0.023255813953488372`", {
          GrayLevel[0]}, StripOnInput -> False]],
       Annotation[#, 
        Style[0.023255813953488372`, {
          GrayLevel[0]}], "Tooltip"]& ]}}, {}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesOrigin->{2., 0},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  ImageSize->{710.0000000000002, Automatic},
  PlotRange->{{0, 30}, {0, 0.5}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.1]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.5037439736875*^9, 3.50374400203125*^9}, 
   3.503805625953125*^9, 3.503805675296875*^9, 3.50380571496875*^9, 
   3.503807023453125*^9, 3.503807072703125*^9, {3.50381198296875*^9, 
   3.503811999375*^9}, 3.503812313125*^9, {3.503822403640625*^9, 
   3.503822417890625*^9}, 3.50422058878125*^9, {3.5042208509375*^9, 
   3.504220867734375*^9}, 3.5042211335*^9, {3.5042542399375*^9, 
   3.504254291*^9}, 3.50425458446875*^9, 3.504254666*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", "first", " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Pd", "=", 
     RowBox[{
      RowBox[{"Length", "[", "ddiff", "]"}], "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Length", "[", "dsame", "]"}], "+", 
        RowBox[{"Length", "[", "ddiff", "]"}]}], ")"}]}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"Ps", "=", 
     RowBox[{
      RowBox[{"Length", "[", "dsame", "]"}], "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Length", "[", "dsame", "]"}], "+", 
        RowBox[{"Length", "[", "ddiff", "]"}]}], ")"}]}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"find", " ", "when", " ", "his1"}], "=", 
    RowBox[{"his2", " ", "\:6761\:4ef6\:6982\:7387\:5bc6\:5ea6"}]}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"bcdiff", "=", 
     RowBox[{"Pd", "*", 
      RowBox[{"BinCounts", "[", 
       RowBox[{"ddiff", ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15", ",", "0.1"}], "}"}]}], "]"}], "*", 
      RowBox[{"10", "/", "Nd"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"bcsame", "=", 
     RowBox[{"Ps", "*", 
      RowBox[{"BinCounts", "[", 
       RowBox[{"dsame", ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "20", ",", "0.1"}], "}"}]}], "]"}], "*", 
      RowBox[{"10", "/", "Ns"}]}]}], ";"}], "\[IndentingNewLine]", "Ps", 
   "\[IndentingNewLine]", "Pd", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ListPlot", "[", 
     RowBox[{"{", 
      RowBox[{"bcdiff", ",", "bcsame"}], "}"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"l", "=", 
     RowBox[{"Min", "[", 
      RowBox[{
       RowBox[{"Length", "[", "bcdiff", "]"}], ",", 
       RowBox[{"Length", "[", "bcsame", "]"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dbc", "=", 
     RowBox[{
      RowBox[{"bcsame", "[", 
       RowBox[{"[", 
        RowBox[{"1", ";;", "l"}], "]"}], "]"}], "-", 
      RowBox[{"bcdiff", "[", 
       RowBox[{"[", 
        RowBox[{"1", ";;", "l"}], "]"}], "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sdbc", "=", 
     RowBox[{"MovingAverage", "[", 
      RowBox[{"dbc", ",", 
       RowBox[{"{", 
        RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"t", "=", "1"}], ";", 
    RowBox[{"k", "=", "1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"For", "[", 
    RowBox[{
     RowBox[{"i", "=", "1"}], ",", 
     RowBox[{"i", "\[LessEqual]", "l"}], ",", 
     RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"sdbc", "[", 
         RowBox[{"[", "i", "]"}], "]"}], ">", "0"}], ",", 
       RowBox[{"t", "=", "i"}], ",", "\[IndentingNewLine]", 
       RowBox[{"If", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"sdbc", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "<", "0"}], ",", 
         RowBox[{
          RowBox[{"k", "=", "i"}], ";", 
          RowBox[{"Break", "[", "]"}]}], ","}], "]"}]}], 
      "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"thd", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"t", "+", "k"}], ")"}], "/", "2"}], "*", 
     "0.1"}]}]}]}]], "Input",
 CellChangeTimes->{{3.50371455525*^9, 3.50371458953125*^9}, 
   3.50374263896875*^9, {3.5037440203125*^9, 3.503744032328125*^9}, {
   3.503744063109375*^9, 3.5037442759375*^9}, {3.5037870783125*^9, 
   3.5037871918125*^9}, {3.50378724515625*^9, 3.503787384140625*^9}, {
   3.503787541703125*^9, 3.5037875573125*^9}, {3.503787620125*^9, 
   3.503787700015625*^9}, {3.503787887828125*^9, 3.503787895671875*^9}, {
   3.503805902484375*^9, 3.503805906359375*^9}, {3.50380672215625*^9, 
   3.50380675590625*^9}, {3.50380682221875*^9, 3.50380684659375*^9}, {
   3.5038075263125*^9, 3.5038075313125*^9}, {3.5038087708125*^9, 
   3.503808791984375*^9}, 3.50380882875*^9, {3.503811107046875*^9, 
   3.5038111080625*^9}, {3.503812513171875*^9, 3.503812514265625*^9}, {
   3.503812544890625*^9, 3.50381255790625*^9}, {3.503812628890625*^9, 
   3.50381265159375*^9}, {3.503812747078125*^9, 3.50381275775*^9}, {
   3.50381279184375*^9, 3.503812797734375*^9}, {3.50382244184375*^9, 
   3.50382244653125*^9}, 3.5038224828125*^9, {3.50382258078125*^9, 
   3.50382263903125*^9}, {3.504220362625*^9, 3.504220468375*^9}, 
   3.504220599453125*^9, 3.504220678171875*^9, {3.504220710703125*^9, 
   3.50422073375*^9}, {3.504220877109375*^9, 3.504220936015625*^9}, {
   3.5042215790625*^9, 3.504221580890625*^9}, {3.504221624796875*^9, 
   3.504221625046875*^9}, {3.5042539236875*^9, 3.504253927921875*^9}, {
   3.50425411875*^9, 3.504254122515625*^9}, {3.504411786171875*^9, 
   3.50441179378125*^9}, 3.5045130325*^9}],

Cell[BoxData[
 FractionBox["307", "2229"]], "Output",
 CellChangeTimes->{
  3.503787897875*^9, 3.503789229515625*^9, {3.5038067426875*^9, 
   3.503806757296875*^9}, {3.503806816890625*^9, 3.503806849390625*^9}, 
   3.503807032984375*^9, 3.503807532015625*^9, 3.503808793640625*^9, 
   3.50380882896875*^9, 3.50381111746875*^9, 3.503812318859375*^9, 
   3.50381251503125*^9, 3.503812558890625*^9, 3.50381265490625*^9, {
   3.50381274840625*^9, 3.50381275825*^9}, 3.50381279884375*^9, {
   3.50382260165625*^9, 3.503822639859375*^9}, 3.504220735609375*^9, {
   3.50422090103125*^9, 3.50422093646875*^9}, 3.504221453125*^9, 
   3.5042214968125*^9, 3.504221583171875*^9, 3.504221625546875*^9, 
   3.504253931375*^9, 3.50425398190625*^9, 3.50425413103125*^9, {
   3.504513009609375*^9, 3.5045130333125*^9}, 3.50451350240625*^9}],

Cell[BoxData[
 FractionBox["1922", "2229"]], "Output",
 CellChangeTimes->{
  3.503787897875*^9, 3.503789229515625*^9, {3.5038067426875*^9, 
   3.503806757296875*^9}, {3.503806816890625*^9, 3.503806849390625*^9}, 
   3.503807032984375*^9, 3.503807532015625*^9, 3.503808793640625*^9, 
   3.50380882896875*^9, 3.50381111746875*^9, 3.503812318859375*^9, 
   3.50381251503125*^9, 3.503812558890625*^9, 3.50381265490625*^9, {
   3.50381274840625*^9, 3.50381275825*^9}, 3.50381279884375*^9, {
   3.50382260165625*^9, 3.503822639859375*^9}, 3.504220735609375*^9, {
   3.50422090103125*^9, 3.50422093646875*^9}, 3.504221453125*^9, 
   3.5042214968125*^9, 3.504221583171875*^9, 3.504221625546875*^9, 
   3.504253931375*^9, 3.50425398190625*^9, 3.50425413103125*^9, {
   3.504513009609375*^9, 3.5045130333125*^9}, 3.504513502421875*^9}],

Cell[BoxData["2.45`"], "Output",
 CellChangeTimes->{
  3.503787897875*^9, 3.503789229515625*^9, {3.5038067426875*^9, 
   3.503806757296875*^9}, {3.503806816890625*^9, 3.503806849390625*^9}, 
   3.503807032984375*^9, 3.503807532015625*^9, 3.503808793640625*^9, 
   3.50380882896875*^9, 3.50381111746875*^9, 3.503812318859375*^9, 
   3.50381251503125*^9, 3.503812558890625*^9, 3.50381265490625*^9, {
   3.50381274840625*^9, 3.50381275825*^9}, 3.50381279884375*^9, {
   3.50382260165625*^9, 3.503822639859375*^9}, 3.504220735609375*^9, {
   3.50422090103125*^9, 3.50422093646875*^9}, 3.504221453125*^9, 
   3.5042214968125*^9, 3.504221583171875*^9, 3.504221625546875*^9, 
   3.504253931375*^9, 3.50425398190625*^9, 3.50425413103125*^9, {
   3.504513009609375*^9, 3.5045130333125*^9}, 3.5045135024375*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLinePlot", "[", "sdbc", "]"}]], "Input",
 CellChangeTimes->{{3.50378772384375*^9, 3.5037877428125*^9}, 
   3.503806848203125*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxdlUtIlFEUxy9SUEQgEhgRMUlFlEZWZpY2x1fa+JqX83Kc+b4RiRYREVSb
6CuDQogMpbCXMxU9NkG0ykV+QRCtImolBW6CCBfSJqgWFfO/wfkPiPzmf8+9
55z/uXc2Fo5HRyuMMVN///79L3+WgrVfS4mK96UgvpD6zadKNasegFfI2O+W
dauv3gNXyt26kYmnz+6A10jrp+/nx17cBK+VxkJosa3zOni9fBm/cDL16gY4
IPOV85+r+ybBNaRvkstNVaN1b6fAW2j9Vpx/BbxNzs4dfbcYnwDXUvwO2n8n
xdcT70I94+DdtP8eWt+A/S+B91J8I/K5CN6H9afBTWLUZz/xAaw/MlfmZhsP
bpGyfyfAB2l9kHSx/pTZIzat0pu4Vf26bgZ6qywt275yuuE29DbNXpvtN/R2
2y/o7bZf0DvsvEDvkI8flk/+qCpB70T+j6B3wv/70A9RfsSmi/Quyr9bJp/P
/jzWMg29m/I/TPlZHocesn5DD1l/offo/bwe6m8v/LgGndj0kd5n5x96vz7P
69f9NgPk7wDVH9a6hMmvsK7fJzYRXZ9EdH+8iPbbj9D5Uft+ID6KfB4iPirN
MxsaR849RnxUvr1JvDzz6wniY/Z9QnyM/I7p/f2Y9tvEKf+4vi+e5WT5fvpx
8ndQ7yeDen69QV2vT+tNQvsrCZoXYj9B8UntlyR1v72knk8/SfObovNT1D9i
P0X+pbUuaao/jf3Bfpryz+h5lgzNX4byJ90M2fcc8UM076T7pJss+Zel9yxL
9Wfp/RmGP3b+iL1hvd4ftr+fiM+hniLic3pevRzNT47uX173V/KUf57ub173
wzh6fcDR/omj63dI9xydb9Gh8xzt74JD75ur/Qy4dB9d7Y/jUn9c3b+iS/2m
9Qsu/T4U9HmBAs1TQefvkO4V/vfvD+mD3gw=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  ImageSize->{709.1666666666672, Automatic},
  PlotRange->{{0., 148.}, {-0.05074670146440481, 0.039147455415398}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{{3.503787635625*^9, 3.50378764296875*^9}, {
   3.503787689484375*^9, 3.50378770059375*^9}, {3.503787733703125*^9, 
   3.503787743984375*^9}, 3.5037892346875*^9, 3.503806851375*^9, 
   3.503807106265625*^9, 3.503812330609375*^9, 3.50381270259375*^9, 
   3.503812803125*^9, 3.503822651875*^9, 3.50422074*^9, 3.50422090984375*^9, 
   3.5042214561875*^9, 3.50422162834375*^9, 3.504253954921875*^9, 
   3.504254142875*^9}]
}, Closed]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.503743361875*^9, 3.50374336190625*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"For", "[", 
    RowBox[{
     RowBox[{"i", "=", "1"}], ",", 
     RowBox[{"i", "\[LessEqual]", 
      RowBox[{"Length", "[", "ddiff", "]"}]}], ",", "i", ",", 
     "\[IndentingNewLine]", 
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"ddiff", "[", "i", "]"}], ">", "200000"}], ",", 
       RowBox[{"ddiff", "=", 
        RowBox[{"Delete", "[", 
         RowBox[{"ddiff", ",", "i"}], "]"}]}], ",", 
       RowBox[{"i", "++"}]}], "]"}]}], "]"}], ";"}], "*)"}]], "Input",
 CellChangeTimes->{{3.503704988796875*^9, 3.503704989859375*^9}, {
   3.503705159609375*^9, 3.50370520684375*^9}, {3.50370526153125*^9, 
   3.50370526178125*^9}, {3.503705327578125*^9, 3.503705330140625*^9}, {
   3.503705360703125*^9, 3.503705410109375*^9}, 3.503705517671875*^9, {
   3.503705572203125*^9, 3.503705601953125*^9}, {3.503705700765625*^9, 
   3.5037057980625*^9}, 3.503714545875*^9}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"Position", "[", 
    RowBox[{"ddiff", ",", 
     RowBox[{"Select", "[", 
      RowBox[{"ddiff", ",", 
       RowBox[{
        RowBox[{"#", ">", "200000"}], "&"}]}], "]"}]}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Length", "[", "tdd", "]"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.50370541140625*^9, 3.503705414828125*^9}, {
   3.503705450671875*^9, 3.503705451921875*^9}, 3.503714548734375*^9}],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"ddiff2", "=", 
     RowBox[{"Flatten", "[", 
      RowBox[{
       RowBox[{"Reap", "[", 
        RowBox[{"For", "[", 
         RowBox[{
          RowBox[{"i", "=", "15"}], ",", 
          RowBox[{"i", "\[LessEqual]", "30"}], ",", 
          RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
          RowBox[{"For", "[", 
           RowBox[{
            RowBox[{"j", "=", 
             RowBox[{"i", "+", "1"}]}], ",", 
            RowBox[{"j", "\[LessEqual]", "31"}], ",", 
            RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 
            RowBox[{"Sow", "[", 
             RowBox[{"Flatten", "[", 
              RowBox[{"Outer", "[", 
               RowBox[{"EuclideanDistance", ",", 
                RowBox[{"fdata", "[", 
                 RowBox[{"[", "i", "]"}], "]"}], ",", 
                RowBox[{"fdata", "[", 
                 RowBox[{"[", "j", "]"}], "]"}], ",", "1"}], "]"}], "]"}], 
             "]"}]}], "\[IndentingNewLine]", "]"}]}], "]"}], 
        "\[IndentingNewLine]", "]"}], "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "1"}], "]"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dsame2", "=", 
     RowBox[{
      RowBox[{"Reap", "[", 
       RowBox[{"For", "[", 
        RowBox[{
         RowBox[{"i", "=", "15"}], ",", 
         RowBox[{"i", "\[LessEqual]", "31"}], ",", 
         RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
         RowBox[{"For", "[", 
          RowBox[{
           RowBox[{"j", "=", "1"}], ",", 
           RowBox[{"j", "\[LessEqual]", 
            RowBox[{
             RowBox[{"Length", "[", 
              RowBox[{"fdata", "[", 
               RowBox[{"[", "i", "]"}], "]"}], "]"}], "-", "1"}]}], ",", 
           RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 
           RowBox[{"For", "[", 
            RowBox[{
             RowBox[{"k", "=", 
              RowBox[{"j", "+", "1"}]}], ",", 
             RowBox[{"k", "<=", 
              RowBox[{"Length", "[", 
               RowBox[{"fdata", "[", 
                RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", 
             RowBox[{"k", "++"}], ",", "\[IndentingNewLine]", 
             RowBox[{
              RowBox[{"Sow", "[", 
               RowBox[{"EuclideanDistance", "[", 
                RowBox[{
                 RowBox[{
                  RowBox[{"fdata", "[", 
                   RowBox[{"[", "i", "]"}], "]"}], "[", 
                  RowBox[{"[", "j", "]"}], "]"}], ",", 
                 RowBox[{
                  RowBox[{"fdata", "[", 
                   RowBox[{"[", "i", "]"}], "]"}], "[", 
                  RowBox[{"[", "k", "]"}], "]"}]}], "]"}], "]"}], ";"}]}], 
            "\[IndentingNewLine]", 
            RowBox[{"(*", 
             RowBox[{
              RowBox[{"Sow", "[", 
               RowBox[{"-", 
                RowBox[{"EuclideanDistance", "[", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"fdata", "[", 
                    RowBox[{"[", "i", "]"}], "]"}], "[", 
                   RowBox[{"[", "j", "]"}], "]"}], ",", 
                  RowBox[{
                   RowBox[{"fdata", "[", 
                    RowBox[{"[", "i", "]"}], "]"}], "[", 
                   RowBox[{"[", "k", "]"}], "]"}]}], "]"}]}], "]"}], ";"}], 
             "*)"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", 
          "]"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}],
       "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"using", " ", "threshold"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{"Length", "[", 
        RowBox[{"Select", "[", 
         RowBox[{"ddiff2", ",", 
          RowBox[{
           RowBox[{"#", "\[GreaterEqual]", "thd"}], "&"}]}], "]"}], "]"}], 
       "/", 
       RowBox[{"Length", "[", "ddiff2", "]"}]}], "]"}], "\[IndentingNewLine]", 
     RowBox[{"N", "[", 
      RowBox[{
       RowBox[{"Length", "[", 
        RowBox[{"Select", "[", 
         RowBox[{"dsame2", ",", 
          RowBox[{
           RowBox[{"#", "\[LessEqual]", 
            RowBox[{"(", "thd", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
       RowBox[{"Length", "[", "dsame2", "]"}]}], "]"}]}], "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.50378781328125*^9, 3.503787866078125*^9}, {
   3.5037880004375*^9, 3.50378800434375*^9}, {3.50378806696875*^9, 
   3.5037880899375*^9}, {3.503807411578125*^9, 3.50380742828125*^9}, {
   3.5038123573125*^9, 3.50381236109375*^9}, {3.50381285*^9, 
   3.50381285809375*^9}, {3.503822028671875*^9, 3.503822031828125*^9}, {
   3.503822289890625*^9, 3.50382229178125*^9}, {3.5042211605625*^9, 
   3.5042211645*^9}, {3.5042216571875*^9, 3.5042216853125*^9}, 
   3.504253978421875*^9, 3.504427813609375*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"using", " ", "EER"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"err1", "=", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Length", "[", 
         RowBox[{"Select", "[", 
          RowBox[{"ddiff", ",", 
           RowBox[{
            RowBox[{"#", "<", 
             RowBox[{"(", "x", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
        RowBox[{"Length", "[", "ddiff", "]"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"x", ",", "0", ",", "100"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"err2", "=", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Length", "[", 
         RowBox[{"Select", "[", 
          RowBox[{"dsame", ",", 
           RowBox[{
            RowBox[{"#", ">", "x"}], "&"}]}], "]"}], "]"}], "/", 
        RowBox[{"Length", "[", "dsame", "]"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"x", ",", "0", ",", "100"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.503787906109375*^9, 3.503787954390625*^9}, {
   3.5037880969375*^9, 3.503788165328125*^9}, {3.503789282328125*^9, 
   3.503789323609375*^9}, {3.503789362703125*^9, 3.50378969828125*^9}, {
   3.5037897331875*^9, 3.50378973346875*^9}, {3.5037898018125*^9, 
   3.50378980375*^9}, {3.50381114771875*^9, 3.5038111570625*^9}, {
   3.503811206046875*^9, 3.503811246234375*^9}, {3.5038115053125*^9, 
   3.503811512578125*^9}, 3.50381156275*^9, {3.503811742578125*^9, 
   3.503811760578125*^9}, 3.503812383734375*^9, {3.503812862203125*^9, 
   3.503813058703125*^9}, {3.50381337971875*^9, 3.503813383875*^9}, {
   3.503822721703125*^9, 3.503822722375*^9}, 3.50407606028125*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{"err1", ",", "err2"}], "]"}]], "Input",
 CellChangeTimes->{{3.50381306378125*^9, 3.503813068859375*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxN23c81t//P3BJIuotQiTJCglJyDqXvfe6kqRSZCUJkRWlJFlJEhlFkr2z
Z2QlyaqIjGwhq/yu+pyf5/f9z/t2r1zX9TrX65zzeD7Py8Fzlw0ukJORkTFu
JyP7+3/OB7+T4tir5Mjwf4VU/AccbOLR/3eVe0Yyn03mpiPEh813hhQimidb
75p0C6J6kSvWlDYVSC2veoSQqIxuMG4UbTyr2XRUuLLc+v2GTWf+F1yz7PFu
02+DO9QWrdvw62mhKMJSxs/7nzbdKOVfPGn9ddNNYX1XxqxnsM2RRtl2nRHr
DWR29irH+x12qGWnODXFaTrC/+yJOjTpo1tv0BGOeb/pjJjzRN13p3kfx9IR
hgo1ZVkqvNCXhqb886Xg4W0pSkL94B+K/h+W18CzfmfO1ezbvemlCum5+9Lg
9d/MvsRTuwmlpHfre+6NyGUWdnF5gqk82p9OxYB3FaULFpWAGZbuvLnZu5sQ
SVJcsA9id5bvYWal37TA9MpS+kmwuG3OHoXHYIURW9FP3WA1btWqhGWwzjku
Pfu9DJs2erbxRVySgSC+nf511glfdPJLn8MWItiCrWj9nRsDIZHx75/4Iiuz
yHtRj8C20U6sZwsZCP9x/x1xP+TUpfXy8Cew6x5+yaUlBoKn6N8vwA/dMNjW
UMm0Z9M3QweN74mD77SWDRubgENoY65yuIIjNVzJJx6CY+4YhOXng+PrhTh8
P+4hjP77hDdRMgVNpsYiOE1hVJaRkZFgqFt/+ZHHTZTlW9P8VQxcUB5/Ks0I
XC1FvI4iwa0FdI86P4A7FyZ54n+Ce0Ub8y4xMG16wOm5otgx8PcMv44/BkyE
itM/GpenbqJZAanZiHDw+ov5nfwdYPLvrbE/58BUXK8Ol+9m3vSus4Eld44y
Ew7b7yKNuD/aE39e3VAffPhRZ4BXO1jhgXJliu7eTZdv44r4fR8sdYPsomEz
2F3isq73xF5CtMffAfZHBfOfJV/uYNn0wmstzk5+FgIFaTayqQWgY5fe0Gyo
sRCcHv39BwGIW/GoqYkCK+HfdGe8jSh/sU1THGcjpB36O2PuogvCqzuP7uTA
938I0uoLfL6XHSwWyChLJgxmO5bUOYrAFF9F7Nv0OAh8/ybgAzQZVL618CwH
vr8foA/iWk/inMEl33pEb/uDE0OsmxwiwUFSi2eNn3MQ/rfahaIrIzdXZArA
xHC6MO4GMEEujo+2mwPPl1DE9+Nw5c8xMF1UsWnfCnhZXnWmesdBPH9C0dep
zttp+w4SSINHGqJQVP/4HHu4IDhDeTb/uiw4as5L+6wO2PspzXe1MwcJyv++
sDB0Uf3xDREnsPYi7569fgcJ2SdCbW61hCGxhLxXG2EH8XwIR2zaCoqjiWCK
lbbe1lzwRPJp54JacIfeBHXcR3DJunvCrZGDhP3/FvRwlJhKecLh10HCv9sh
LxwFGUW2G1FxbtqZjNNGhgV8Mj1zg0uAE9/P4YhAlH1EIw3mo3gn9FMTTJdF
rO815yQsWq27vjwUgZZPjZyudgAPbHdZfOkNbsjdcj/sASe+nyNQxpkH3Nef
gaNo9pdaZoO9C9MM1arBF85LTgh/4CT8206eRCCt/+pvMg+Dxd4Ysm4sgNms
B7NHtnERWv2USC8RiSgYLqu3MoEny9cH8g+BP9gGuT+V5MLzJxKVMO2lu6UO
Tqx+nmJvxoXnUyQKcjyGjOy4CC/igr8KLUYiZ9aqLukbYLN6HUeu+1yE/ud/
/+Ahknfu30YTB+Zjt306n8FF+Hc32jxEdE2/xHorwBnXhSLct3JvWpv/whyT
Knj13rU3n03AqdO3biVf5Cb8bz9/iEz0o3TtXMEUeS9YRG+Dc5gKh5Yfgs9c
b3hd8RxM2//J7XY+N14volCJ3Ji8dh2YkYK6q3cY7NTIb2tDwbNpdkEpMeE9
4HchGn8WucDuc2ZvS4+BeY3swv0VeQgTpLvLQDcKdRZ4mmsY8hAOkr7NrXej
kB9LMO/u8+D+L+klcTd5CKb/JmAUirg0/a24iodQ8/flxB8hQvOfdN/34Gmh
/9xUB3kIwv9uyEcoNuyA/K45HsKFv7fn0COksSBM85GMd9PLJoSPT+jAz4v1
4s9xgA3Yzl7iFwGT+Vw5Not4Cf/iEFs0yhj0+12gCz6lFN7gdYaX8O/jm0Qj
qpTEMKXLvIT/LUfRqIA69xSNDy+BFF5IMywaWdnX8HSE8BJc/t7OWx+j3W0f
ZqLjePF6/RjZRy7485bzEpj+LWiPEesvCp2pFnDDSca9eZ95CTf/3t7cMcil
lOebxxQvYdrg7wYYgzgPiKfL/+Yl/IsH72NQu5+KK9XOQ5v2HjYhtLGBBVWt
d0QJHsJ57gnqeenWaS5ziPB3NfNTeoLELkfb/DgFDhUrXnfzBMs9aqyXu3eI
8Hf3FfV+giZWekK3PQFHm/8wa047RPj9dzgLnyCVilXuiBLwwkGamZNN4ISA
fcUcvWCd0cP+o+OHcL58gtbVZbQzVg4R4v9OR6tYZPrf6UFpFr5N53R6XWuU
BKfesjr3TR0cJ66pu2bGR/j4d3uLi0WRo0dl9tiDg6L38h/xAvuqbzCqhIBd
V7+Tn4nnI8j/22CeIvtXzTNuWXw4nz5F581z+0OrwGY7YxpfdvAR9P4NSBzS
K/ctqB7iI9xu+btAxSGVy9ZJfQt8eL+NQzIcOqEL2/g3LfpezGsnM5jv5j5b
Xj4w+zFyU3SCnzD/d3v9Gof2DI8pEjX4CRZ/l3ODeLTjYZvIlVP8eP8l1R0q
BfuD7MFLS7E7krzAkyn+v96EgL8RbYc748Hd1Prvp7LArSUS5ZTV4Do79lcH
PvDj/fsZKmXbFi05zI/nyzOU0zIRoL8ITvXuuGJLKbDpOOFiC39mATyfnqHI
gXjNWD5wUNhtyfwTYF8FB55WDQHCv+3k6jPk+tOQfvSUAJ5/z5B9stTGhr0A
zgPP0Dnjg5N7vcE6hdN1Gs8E8Px8hpRsPuaczxbA+/8zJMVSGn+jGnzI8+71
jGEBwr/ZsjWBtB46XWxYBO/5bGI4QHkY5/MEtCNElrDCfJgwIPR3gUpAZIj7
CD0/eGlmB+thqcM4XyegyWdzlEqa4G/63T/NzQ/j+Z+AuskrBq45gGutgktS
HoCz609G9mSDU90IfvPV4Di+Q440nYdxXklAkT07T3F/BwcFLajKLoF9pfvE
TLYL4jySiFwnqw5e3iuI159EZP80ddcdfkGcTxLROZ0Ha8+kwDpZ5h87zMHS
9AKZFD7g1i1mjS0PBAlFf6fL6URkOXd3KOoZeH6g+PeZbHBA+zgzfzWYqZJF
dL5DEOf/RPQyU13rzRBYJv76xYAFcGvIS1/tbUc2bendE8PEBJ53oM7/ygsO
OH2iLVXiCM5TiYhZ+9L4FTVwmszjrdInwTKCjfspbI/g9ZX0fvtWJFo8wJY0
/AZR98Dzq0T7M7FHcP4ivd+PO7f5XoOZeouezZUdwetzEnrZOFZS0noE568k
JFO896P/V3BrqtqM1izYMtqdmmmLEF6vk9B8YCrX193gALdu2VROMJM1FfHK
MSGcz5JQqomks5QSWFrFJnirMbj1ePSL5gtgS563lQ9dhXBeI73fnuVei0Ah
vJ6T3o+Cb/FQNNh6Lfzpc6IIXk+fo8v1o8cytUXx+pGKgswoeX7bi+H95BWS
E6FdGncRI5z79/qv0Nw2+oauG+DkPubomgAwMXv/paxgME0gl9TTSHC5OT9N
UKwY/jyvkLOocL9rMpiH6vjr8+ng4FyCrmwpeN5Ca46pGfxCzKB6a6cYrt9e
oZM7iBGzfWI4j6Yj2oHTVp+HxAiX/g734XRUmX/+eNOEGM6j6WiJrkr5ke1x
nDfT0enS5lEnD3CtdfddjSCwm+wXM4nw43j8XiMBhuHD3DHgL2Pj63SJ4LDy
mZbfL8FKkYtxP7KP4/z6Gi1fWrv8qfg4we3v5Wi+Rq/QFvnaKrAF43b67EYw
/QTt0NP3xwn/4uqt16iukj4vqOc4zpuvkXvU3ltug8fxfvgaCdqzm1iNgwfk
uQ/pz4EjmAWWZVeOE/5t932vkcqUcKPAFvFNr1Yfj2GmBmdES9tR7BYn/Fu+
l1+js47yMnN7wXuUVHd+4QC/ZdH+0sQHvjFjkFkoIo7zagYSriP6JkuCv8VY
6IcRxPH+nYGinKw4vdXA6iq2P231wOv7nGpNieI472agrLlrD5UswecbPC8e
tQFbyfDqLF0GX8xuP/7GDWzN67nf10cc54UMZPOEZ5tyINiWrn2S+oE4zgMZ
yO6WR2drFNjxclsS8YU4zgcZyGn4+r39GeKE+3/j0HoGunKS++q3fHFc32ci
59ZWs5QysIvidQX7OrBrEZfA0Raw25HW3UudYPdE95WSfrAHM9egz7A4zuuZ
6EZwy1ulSbDXFvcs6gVxnFcykbcrZ3TrmjhhZepvoM1EvhPNPhFbJTZ909LN
mkgjgfNGJvL/eFB3P4MEzv+ZKECjWfwbqwSh6e/w1Wei2xWu7Cmc4Lsv302J
iIKDIzjKSuTBIVTvkn3UJfB8zUIPvK4FK+mDQ+cPuFCfBIdbN51qtZTA+SUL
PdQ/cJjoBI6Wdlkd9AHHZLF/exEIfsLT2Gj3QAKvB1koNuZqtsgjcNx/7I8X
48DPAt76lrwAJ6w42/hkSOD+RxZKdNyvp1QATh5qkKAuB78gOh9orQOntLBt
j2iRwOtPFkpVaJg2/QhOK7zSxfYZnC7IVj44LIHzVxZ6nVD//MUkOIPpyn27
BQmct7NQ1r1910TWJXAey0I5ZPXmi1slN517zUmphAac94NV0IcBXHCmjkFp
nySuz7NQUeflNSouSZzXslCxOutQi4Ak4X/96ixUUl7bFC4KLj12OcdUCly+
v9ZvUB1ctZ1F3+4kmJagpKhqCya6Xz7O5Qn23nNLKMwfnJwVc2jjniRej7NQ
k1YWh0MkeGasjqUvFrznVh+9+nNJvP5mI6mDczSFr8GWZZTbeArAt0+y/Qkv
l8R5MhulLx79RdYgidfrbNQRpjrr2AZePnJ6vP8TeH+T8zeNAbDCxTt9RWNg
G/K4Tt45cEhcbkvkiiSuR7NRnlRjPTn5CbzeZyOyqwtFX+jBmq8OvCrhAjup
Hk/mEwRHDWk8jRIDl/pYRlHIgr/tc33grHwC99OyEVXRvTsD2mAhowQ/HZMT
OC9nI6PZAo9SixN4v8lG14ObrwpYg+l+cxK/3QGnOFyXiUkDN1M/OE6VC55/
nizk+ga8V6Hk0HANWO5LG4dB8wmcx7NRENMavdBn8Ecd3m07psGrP6T/uC2d
wPtfNuII1P/1/c8JnL+zkQqX9azhdqlN21fcGK/6Twrvf9mo6FdK31MO8FaR
Dy3Xj4L5msfqR0+AdWz+VBgrSOG8no1cKPYU12hI4f0xG8U84885aihF0Po3
YbJRpQx6FX9KCu9/2Wik2yh5p5UUzvc5iPaa7VNPe/DR3b5R4y5SeD/MQQpk
Qm+SA8BGM31fz0SC+0dEnWVjwRe+3KXYlyyF64UcNP1xIGr5Fdi1RYK/Kxf8
+FWEs9YHcOndmTfV82BylRSdzKPSm1YjPzP4xAkcUs7kcicT3OnRSnltGjxy
6cZhkT/gX0QBvYmdMpv21fP79pZRhvAv/ovmICq1bpcX+8FhSHh7AA+YVeL2
47NHwIlCnw+j4+DDvGLlbLLgvP339FaVwDKM37590pLB9VAOqqM9cS3fSIbw
bzvUzUE6FKHbI8zBXWsjj52swGd+ygrq2INLRKqvnvIC73FUeWMTAq4Kpjoz
EyWD66cc5Piqidw1HryvKfjFegr47ZiOhn+WDM4bOUjkyxmbogUZ3K/LQZ/X
D9Ki3+CgfcOZddtkNy0h9cJQaxd4mGjzq4NJFverSOPpJvDk5AFZnFdykFzU
pNzAIfBEXsa3iyLg6A9Ot6ckZXG9lYOU50UFXOTB83SLLavq4Hjhwit+BrK4
n5iDtHSuM1KdAr+499uc0R5M1uiXzOkFfj2qqPbyFtiMknJSmFTT/y9P5aDt
PG8fFESB8xSDjsnGg8+e0/pUkyKL67kctMtvl6dGFvhNfDv7+yKwTXl4tWmV
LK73chHjZ6OLXxrB1WtMOy50yOJ8lYsus/a8nugFs514ou88BG40Pb24PAF2
dT3w2GdBFteHuag9N2kgeJsczmO56FlcHduv+3K4fstFUawRYXlx4OAoS0rn
THCgUUNleyH4Jr2Qp3ClHM5jucirPfJ4yFuwe8jazGQ7+KrWuTTNHrDjjkar
tEE5nMdy0aW3wgeof8jhfmwusrod1WM9L4f7gbnIjNxKh2cr2rS+99Gabwxg
counl1ofI5xf8tDvfRTcRxIRzit5aLnH9su9NPDPR++jf+SAp40lDdXfgIff
b3tL2Qzu0/4gU9sP7qKR+sX5HdzR+CzbbwrhPJSHWgK32w8sgt8qO/KiP+De
OAqqz/8RcD8rD3X/lrhAuwf80dyuWnovuONN3AE7NnA7a8eNGA4CQepfQZ+H
Wq9v623kJuA8lYfedUtKrPARcD+T9P4S9pF8R8D1UfFzpkcJuD+Wh6qMKNML
ToBL6R0uMiqAS648q1FSARe2f+Bw0SDgvJaH8oS3eyfpEHBeykM5IVJ9HQYE
3E/LQ2ef7NpWYgKmS/0mlGAGrsgrIN6xADtWBd28fI6A81Qe2t9qkW5ykYD7
6fmouVe0S9YW7DlKScbjCBZY6OWndQbf2env1XsdPMJ7+H2qH/jhsY3VB7fA
SoQP3G53CTif5aOfWik6FvfBiSc93ZXDwPoXdRMFH4LJrnI1Mzwm4DyXjzJ9
fi2uxoItgt8d+PYMzFqxr8E7i4DzWT4K5y5lLGoj4PyUj66WyOo91ZLHeSAf
5Zk1kPfoyeM8kI+WVvXy9xiDJZ70WuudBLtLW7EGnwYX9001N5wFr3q6+Wy9
CJZm2yKKbOVxvshHN0qDhj0cwX6y2RmXfMC3yz+5E0PBDRZnD0dGgqk2fnxu
iwarx7uE0jyVx3klHwWhPwqqCeAHldw7xXPkcX7JR+2WGRVXCsD0WySdX5eA
DROquMfLwZHymp+4a+RxvilAHwc771o2gJluWsjEvgObco5Nf2qTx3mmAEVX
X0lg6ASzbr1Fea8f/FQx2o78O/jL0EF2uXEwR8Cr9utT8jhvFKCz3Mf98+fA
ibXlx+cWwUNWamOCq2DubR0xNn/AF56f0k4mV8D5oQC9UP6+8ZUSPPrdMWcf
DZjv9rKV6X8KuL9QgF7V0zS1Mivg/b4ATV58eGMHG1ho+wFhFQ4FvP8XoMsp
qYN+3OAsVdHIMj7w3OgblRVBBbzfFyDRO8orYkfBV/naXjkdB+e9JVqknwCL
U9vXcCmAi9V9+J5ogFfHqfq6dMAyQeH36Q3BXgJsBB1TBZwvClB50/P5u6fA
WXvbr3idASddXJ11Og+OyuN2srJWwHmjAN0h150xtQM7xiVNyV0FG0otT/B4
giW7tH7Q+oPZnRPGfgaB6SrfWY+GgLfuWhrpDQcvneK42BqlgPNLARp7qfG9
KgacO/hz8EEa2Jvl6ZfTJWAn64bT+uUKOK8UoPP5c/1K1Qo4jxQgk61s5pL1
CjhvFCA1fZW+w01goamYHvoOMMPdmU8rPWDKTyymU5/By9xKXQOD4AlnR+PO
7wq4v0S6/yujOxvGFXB+KUTtu2oM30wp4PxRiGrMpzoy5sAFacwGiYvg1GX5
9w9XwFdFJlrOUytuWs4msukoC5jqmWzDBh/4w6eRmhZJcNFV6eo8Ajjuv9DK
J2rg0NMl6IEW2P/VcPlNPbDryi45VyOwjeqJsktERZyfCtEUH0tdtrki7qcX
IucdK80rloq4v1WIlia6O+UvgD1bivrvXgKTZUYPv3cAB4S6T7I4K+L+eiGi
diYunHUFhxhKrr/0ADMc30sx7w2OZlqmkfIH71/+xHAzUBH30wpRYk/hvqZ7
4PwzEtI/YhVxv70QSckzK4omKOJ+WyEq5/yl4fEcrEjxyaD6Jfjt9wKzHRng
jlRX25gCcL+duIdABfisNtNN5xrwiNDS3ZIGRdyfL0S2dF1h5M3gmbn8xxrt
YJcPDxPCO8HLedde9nYr4jxZiMjdjxfbDiri/nwhCjzJWJXzHUwrvfh2dVwR
503S98/2sV1hGsz4J687aB4c8zVyoGMJzF7lMsa6Bk5KNJo9t6GI+/+FiC9A
bDltqxLOr4VIVHVhuzQtWHpHHvO7PeDKiYgDDCxgpZarh07tV8J5thA1ZhgK
Jx1UwucjRUgn9JjEBA/4wxUGdExACfcnixDR8KeKp5AS7hcWoX6xDzo1ouCz
TLkmNBLgkV/hFobSYNse54tPEHimxMBxSFEJ9w+LkEusqOthNSWcr4uQ95n5
W2/0wHc4cx5qngTvpAh/GnEaHP79yvO+s2CmBv3XXBfBT1KP5tvZKuE8XYTq
e86/jXcEz++I6vvgrITzcxFil3k7vd0NrOGwukXGE5zYZsGX7A9ePVqjQxsM
5j2/eJYQqoTzdBEyiDx0zSVSCedp0vXVnbyTGg1+uXTvSX+sEs7XRYjs5GyV
0nMw8Y3RWPprcMDk7bWBbHDW/uJdjAXgfp2Jg+olSjiPFyEq3/3HvcrBlt/8
Tn2vBxcqjfhpt4F3pWik5n8CX6TObN0/AA6XGhzUH1bCeb0IldsxLN4aA/+I
VaYqmQQztbrtm54Fh/4s83NyU8Z5thhtu0y9hSMQ7PHDyLctCkxsPGT5JgZ8
PHUVpcSB6QNbDkQkKuO8W4xmLzzb8H6hjPNuMUrjUqkwyQBfGJzwFioAK1SW
W7CWgDniw+Qoy8G/vazY56vAveYSfz7XKeP8XIyKpHd8aWxUxv3GYvSQ9XNZ
fosyfv6qGDmvZD5NeA/W677pdf8j+Eih8enrPeAdUXyyFz4r435lMRpzWWPT
HwTXGbauy3wHJ4om9PONK+N+YzHy3e1SumcKfHpWJZZsDizVxnJjcgGcpXFh
7QmFyqZ56rM8NPeAyZ/7m0nsBQ/4m0hxsangfmUxKjvHz/ofBzhGfn1llQvs
ztHWM3IIbLyRUNxxGCz6xeVxuTCYrkz1etoxFdz/LEa3JCOWTyqCV3O/uFEb
grvDs00XTVRwP7QY5V8JkBg0A4frmTK3WICdhAV+FZ0DC0y1FYTagr+nXXO1
cQbXPritOu4BTnR5tNfWH0w/esAvLRDsdzJ1/Mc98Ow7EYPDoSq4vipGlnLF
JXaRKrheKUbtWfJc6dEquD4pRoir6d5krAquN4pRxkODBcEEMDtVn7nDc3CI
x/m61y9VcL1Rgn5PThyZfg22P+MSJZQD7n+//sexQAXXEyXoTcHO9plycMwT
9gSnBvCOXSnU2e/A132FnefawGPzhb1HO8HECwRF524V3J8sQRIa+nt+DoCZ
hM99vzoOvp3wQztvCrzIcLVgYQ5sdXuN/fgSuHPZP/DaqgquR0qQkh3tbP4f
cO7nSOISueqmOfX2V4lvV8X1SgkKr37O70YDJj8uFF74H/hKSsHqLwbwAAs6
L7lXFdcnJUgvuOGdOxu48o+uWDGHKn7eowQJX+mOXeEGxw1ZbpPiV8X1RQna
ZTLu4HFEFdcLJcj77ZWukqOqOL+XoCmpVbm142Dz1zdTpKVUcT4vQc0HaOhu
yIGDxgVzvHTBark6Rj6W4CKeT6UVVuBD0Wd4yC6Bo3aM3Sc4gCm9nJZ8r6ji
/F+Crs0sW1RdAw+f9WvY4gE26qQWUfBWxc+jlKAalfDomzfBKg3iDufDwU2q
ffJKiWDaO0fSxdLAOm99mHhywJfHUjX3F6ji+qMEhVJ1+DKWgLP51vJ3loM7
1LgntlWD99x1NV5qBJs0vq0YeQ92G59b+PIRHE29T+BTD7iYX+lM22dVXJ+U
oF51h8iGQbBF0+5LqXPgbxoFsne3qG364jszetvd4B+aGyMaB8E09nxsijxg
wWB9fWl+sHa6x+1jR8COzUlvDh9Vw/VRCZrTUgullVfD9dEbRO9wpY5CGSx6
P2Z1XQ1s+LpGeFEL7NIyaTWlp4b7u29QwU7U9pkIXtYOO9FqCWZxLHGstwJL
hQwllduo4XrmDTqVQdtTYA++0Xp8V6YTuHzXHfd4dzCZbu+3B77gt+XGXC4B
4FCh9+eJd8DEOK1kmWA1XC+9QRy73g5zhILHvBR5tkWq4frpDcqaKr8w/gjs
flrqRcsTNVwfvUGElvyR7HgwlezRQ1FJ4Pb0dGuPFHA0G1+qxSuwZXDSmEKm
Gq6P3iC+dXb+Q7ngWbuYSzSF4KI+xrSZErCvZtiPD+VquH4ijYea2jzzbzVc
X5DGo7BGdJ1MHdcHpPE4hK4OUKjj+oA0Ho9Kcmup1HHeJ43HdvGFVFrwmGu2
2H06dZz/SeMxInjtyh51nPdLkbtJar7xXjChnmvpBBu4/TmrGzk32PLW7uWm
w2C+xWDJTGHwrBXV9Yhj6rh+KEVFnf7FbhJgX6WNlVPSYLU8DykCUsfPM5Qi
Ou4lD25FcHfElTdUquq4fihFz7ZOrU1qqOP6oRSJDA3dyDcAV1b3/vYyA98R
NZE7ZwHWS3zvrXJOHef/UrSXXrtC4CJ4wO/txi5bsNPZCt9PV8AbhIItz66D
A5l/aXcEauA8VoYK+mSfRz4CD8cHrJukgNe28PFJZoLprd4ZshSC2RmfjlO/
AQvUO/qslmvg/FWGxN0IjBPVYHk++ld99WCtniFCcxOYGJTfVdqqgfNSGbKS
DrR/3aGB80kZcpokksd1gQN11o/4fAHHZcWftBwB59Mr3pKfBje7jGRxLoG7
eYpUGFbBw113+7f+Ac8GnnJe2KKJ8xBpPCSPUH3fBqZ/0n6sfidY4PfVMymM
YPEM5cVHLGD5M8z37uwHa9GNc1w/CCZWlRRc4tHE/WfS9TsHa5nxa+L8VYYu
c1l80zgC9ugUdpc+Cr59a8suweOaOJ+VoXDxD0lsJzRx/iKNz2jyiZ2y4LRo
17bfBE2ch8pRvrrahWklcOUqy9oXNU3cfy1Hza8mQtu0wN3mZbyVepr4ebBy
NLzzQWmWkSbOM+VottzSIIGoifNJOVq7LDoWZg6mPEjhfdMSTN/xkeGqFZjd
P+XleRswv9h1ZGQPFvuu8VHJSRP3b8sRIYrN7rgLWEt1mozXHUxcrohiuqGJ
8045snoZJrjdF3zZ7Hz1L38wbfyPAZk74LShKxt+wZo4H5UjNb6V/Q2h4BF7
Xxnah+CA7O2n9B+DOZdCrkc91cR5ijS+UkzRfQlgC5+nBRwvwOs13B8vpIFj
qNJ/pmWAJbWP0c/mgD+GlYgcL9TE+agcOXfJ63q8AdPta3SoqABnnNELpqgF
ayV/SlN/q4nzUjn6MWbRGNIMvnNkZPRDO5jX2YGS5SO4pmCB26JHE+ehcmS5
5qmY9FkT55Ny9AdtPTc2qIn38woUGxDke2REE++XFUiqcXe88w9NvD9WIFcD
jv71eXB2nxBL4BpYh6NAonkDPGkla7KbQgvvnxWIb1oz4gmtFt7/KlC96Ifs
ATotvJ9VICs3s3YeRjB56eC0LQs4nuzSzqz9YBnl2cOLB8G9d900pHjB7q1/
bHwEtAgN//qJFYiJ4XZgrRD4Pk/Slh4EppCs9JzSAyfeUI0RNQYTqlqL3E5q
4X5hBfqyzeRT6Wkt3P+rQJ4anxe3nNPC/b8KtPeB1R7Vi1p4/61ABR8mRINt
wUZ7r+q/dwTPm69eZroKDk3wCznlBhYaoXr9zBPcLBD67ruPFt6vK9Cly8w/
BAK08H5dgSjz4qic7mjh/bUSJS/zHMoPBivIvlZeDQUP+IlZoYdgHqZdIU6P
wbZpo4UJT8EZclWDHQngnx0xNBQvtHC9WIkoubfkvi3Qwvt1JdIs6u1fKQGH
auVRHq4Afxy4L2Jeo4XXu0rEes3a7H6DFt7PSZ//KWvGTBv4SH3LFoNusLNZ
ymH/fnDBtK9x3oAWXh8r0dpNM5/vw2ACs9hLpnHwrVc7P6hOgZvQ6Lr7HPi/
zkretEWwkU2MXt+KFs4Xlejx+lUP2j/gL6HaybLk2rj+rEScPIdaHSm1cZ6o
RNbFZMvxO8Dp2r0H3+/Sxut1JZodzNUkZwAfd71/7Rgz2GOHdbzVPnBFHKHx
4QFt3L+sRBTHWH/Wc4HVGn6yLR/SxvmjEt0/1aLCLwhmCvCNuScGfpZ+bHpK
Bpz7+/HDHG1wvQ6ZrJsFmGao52LqObCeW25oz0VwJM39kh124J74i8PSl7Xx
flCJ2MUIuxyugs+9ZZGMcwOnmP882+apjfullWhytvkemS+YTOHYsbpQMEPE
4967Cf/n75lDGk69/D8/H3Mz70g2+Fv/ehpTPriH3S1ho0gb1+uk6020C3lf
qY37s5WodPh7QEmtNt6PKlEOr6Vn0ltwqk3vleBmbdyvrUTxaUY219rBUZOt
Fhad4GAhdWPVbvBNpxpNkX6we46sAsuANt6/KpF+CS9b2QxYoPq/JcsNMAdF
0KT6Vp1NM6lQDIluB9Pe8e7ZRwPe2rTcRvGfDu4Hk+4/7anSLiZw//vBl6ns
4PyeJn8tIXDIYO7pWVlwAJeQUY+8Dt4PSffrhVSNamWwUwqn/Ct1sPV4rESk
NtjIIYz7ojGYMHdrt+RpsPgxMqqDZ3Vwf7kSCV7z+EN9QQf3P0jzrXBhYd4G
zLLiONFnD6aTHh+sdQJTep3vfu0CXi//3BrlroP7z5VonoxY53MDPKbQ8cbG
F/w1QCtHP0AH79+VqKu+PlXqDriZSj6eKxj8nE7gesMTHfy8SiVpfT+5TPEM
XPDmrptCsg7ezyuRXFjxkk8quP7i+LWydLCODMviapYOfj65En3are4ima+D
9/9KZDnq/vNasQ5+Hob0+UtTnXPLwCvWVFeE6sE7GGwuv2wFh489mh7pAO8r
b3Dg/qSD8wRpfY74NXm2Twc/L0P6Pi4dso//CtapGLF5OAu+zPjiwr0tupv2
rdxmRbkDHGp34ZwfPXiv/MPBciZwAlOd5TqrLu5vkO7/yYWvJw6Ac6q4z7hx
6eLndSpRjX3A6fnD4E7m4VMOYmDzKYa+NEld3B+pRN+rFc3GZMCO0Vd7eOR1
8e/bVaElhyTieWXw3tpzxidNwCdYOQ10rcHVM/rvg+3AGnV+ek2XwR0x2W3b
XXRxHqtCZk6DOsruuvi8ogrdqH+mKX1XF59XVCGK2PYm9/vg+1fINArCwEyq
Io0/H+riPFeF4tgs1Y7GgHnnHzQ4xunivFaFMhsqVNITwZJPZ+rGX4ArnQ8o
H3qli5/PrkKrizOhbJlgseuV/btzwY7roXzbC8GpPmdd1kt0cR6sQmy3yWlH
q8GhwUlJ75vATf+5zNS36uLzEtL1RihJl3aA5ZgYA7O7wO6Pv3e86NXF+bIK
5bAVsMd+AU/G37YN+6aLz1tI189lWnB7BHzmxSHyGz/AG5OPzozt0cP1dBWK
FfLdNsQElnSyefV5rx4+r65CH7P19LtZwc4/JX91sIHTXakV33KAR1Z6Qsq4
wf7S1WJFvGAOr7TeHD5wWXm472sBsBmZJ2+qoB6u16vQL/nzzYlCejifVqFI
f03npyLgo3XH9kaLglsp2crDxfTw+UkVogqapL4jCVbYWWbsJQP+qvN8zU1O
Dz9vSbofQ+8nOBPALB3XVB0UwAUMFlPWSmBDY5WIcyrg2SihE6fVwPe7mb6a
aujhfkMVEmDdCDDQAjecGhXQ1gFbPW1rV9UDb/la6KpgoIfzN+l+53jGJmsE
tqz/3rRxCsxpf/h69Xlw+MdS7twLerjfUIW2Ip32JGuwS+pXz8hL4OHdVw7d
sgO/KCz4qHpVD/ffSPPvoJqf5DVwYFCPIL8bePmnbTfLdT3cb6hCNqfX/Xd4
gtVFDvRNeIMFtiqIttwE03RZ3c24DZ5MDRx4EAQ2p2cJ9g0Gt3imSVwJ0cP1
A2n+fJceOhsKztBpCTEIBzst0MsyxoBFY4gTnxLAiVt/RL1NAjM4eCoUPwcH
dNFOv0zRw/2TKrSA4h7HvNTD/UfS9/dSWPneK/BH+qpZz9d6uJ6pQio3DGLt
M8EF34dUT2fr4X4Kab7f4186UAyWOno5+VsleB9F+FpNLXi9K8/g+VuwPUHl
z8MmPVwvVaH+l59e3m4GazFcMnZrBZfdWCWzaQcvZY7M3uwAiwx1DDztBNsy
VbQXdenh/k4VSlZ/VfmhG8yc5f+M+jM4iMncFw2Ca9XVnMyG9HB9VY1+3xCz
vPYdLJ7FoRc6CnYaoiW8GgenMa0I10+Ah9S/HxicArN5vf9vfUYP12vVyCSr
bINpHtzIFPVVawks4+VYcXMV7Jpllvl0HZw5pBJf9EcP13PViFPjgM80uT6u
56qRuRfNZept+rg+q0YPs35ZcG8Htw4N6SBqMBVzu5wZDfiGVyp76H/gmSHf
P3UM4HMaJ7+sMYO7so6WH2UD0w3vz9BiB6sz74iz5gDf1Fi6f5MTXOr1zesp
tz6u56qR8HDJ6Q984ESNCFnqI+B+L58j3ML6uN6rRozZdvvRUbDOsOlOs2Pg
O8xKv12Og6s1RKYeSOjjerAarXmxfU47ARbLpmqpkwY7Di+UDsiCBzVaYpkU
wEbZz29oqYAbmL3Nb2qApbxNZIp0wC7ZCoIf9PRxPVmNMoaF2KYNwGPM+2ip
jcEHNbevc5mCxT4qdrCe1Me/71GNVM74pu4+pY/rvWpEHC/1pjoNtr26YrRh
AX4Q6Lxl6hw478nE696L4HoevoD3Nvq4PqtG3ZlWZm9twT9OJIhU2IN/13ym
LHAE0+mwfk53AnN2m+QmOYPFzkXcjXEBq0y2nQlz1cf1H+n9ZPJ2q90G296P
rvnzEBySsNtp8jE4Nz+IrfcpuB41zLfH6+P6kfR6jVsbGxLAPwwJ8eVJ4PXP
N67lP9fH9WQ12mVTrJmeoo/rQdL4zy8eTHqpj+st0ue/Ibr8+BVYhfJya+hr
MDH0VXJgJtiWdczDOxt8I5lb/1quPq6vSN+H0NlD9vn6uL4i3e9FT3+fKwTn
KfR+OFmsj+sf0vU1M6XpvQF3mxj6qpbp43qHdH0DD0zkKvRxfUP6fmybBY9X
gekWqbYK1oA5fZR7OOv0cX1TjexSJET/NIPz2vjv9XSCQ7mqnq92/Z9/70as
3NcDVnk30yvTB+Y8ELh4+rM+rpdIn8eZnc7nqz6ub0ifvz5f4NmgPq5vSO/H
qq1cNQR+4Dh85tt3sG21p8fWMX1cn5Dej4nhIfcP8EHbtEzlSfB6mXzTxWlw
7gWnjdR5sO3OeLGJpf/zemfFdWlX9HF9Q3q9/JZLR9bA61QXAnR+g7vN1+Mu
b4CV009SL2w3wPVONeIgm+Ni3GGA6xvSzxvekROnBX9KOXDSdBc4Z63gqjsd
OERXJ+QxvQH+/YQadCnpe2rJHrDSrxs1fUxgDs09X9b3gkNirqj5HQSvjbfm
bBMAd8lebOEVBOeE/R5VFQLf/x5JfknEANdLNcjmhOD+IFHwgUEzg2ZxcNed
u4G7pMH3RYpK9RBYqXtkLlzx//y8oDdtnjJ41Yfx0EfV//N6H9Lll9TB2YeU
zJm1DHD9VYOCPftcJXXANm3OYSf1wIpcO9I9DAxwPVaD2N0S6p8YgYPr/4hw
nDbAz4/VoIir47aW/QY4L9cgVhWPK4ZfDHD+rUGJe2ncVQbAAhNPvE98A+eU
Cd4SHAZLhZbdOzBigPNvDao6pxNOPwZWO/41etsPcPt2p/jlCfBAelj6lxnw
jH5uce1PsCu3UmXhogHOxzXoz1Jnfdov8O3GCy1PV8C7Ypc+hK6BoxwDe/1/
G+C8XIP2y+8ddN0AJzO8HL20xXDTgiMnps23gmXunVpT2A7WFPGi4qcBd5Dv
+o9tpyHOqzXI7GMc43//gb+lCLOR7wbbelRyLtKD57X0+cf2gK8f+CbcxwQm
m3cWb91riPNvDbpTu1W2ihVM9yhSMY/NEOffGvToEo9GCjuYXaZAL4YD/GKX
qul9TkOch2tQQa6N1VVecB0x6MpJAbDW4X3uWoLgzt+vvJEQ2Lxd5paoiCHO
wzVoOLHlHo8o+KfqTDSNOJh8iu7F3Anw7nDR3E+yYA4Jo8oyeXAq9ff6LEWw
SP+1liRlQ5yPa1BRBmVnlKohzrs1CPk96r2rbojzZC3S4S0evawNtnjXu2Cs
Dx55aremZmiI82YtcnBa3yJjDF5QuE8lbAq+wcj+H+dJMPmyx0VaW3Bg76ey
JQ9wt2sN1R4vMB9DpuFRH0OcZ2vR9cyYOB0/cJPm7XE7fzBtmRjj4D1DnCdr
0emTHJZ/7oMzFmle7Qs1xPmxFv0J+7UoGQ7WFRoimESCZy+WdIVGg8Pjw+zf
xYJf8m9rchkwxP1+0vgtLYScHAMvVA8bys2C2Qs4bknMG+K8VotUX5oXiCyA
nWKjR/mXwDEPOvdyLYOnrml5Mq6DCea1n7eTGW06QkGGsLoVPMKXlzi5HUzH
NvvhOzX4xH+C277SGOG8V4vOkduId+8EBy8mWb//DyxaHSFYwAzuDvGfizkA
5uY772klDL5cpbBNCIGj87zFD8mDq1NKrDkUjfB5Qy2aiFmKZlEG7wkRbaJX
BVu7pAlu0wSXmHE++KUDHta2qJzVM8J5shbtlI+ZGzcAi4t1cQ4ZgS0P0Rv1
m4CDWHVufSSCc3cGFbSaGeF8WIv6yepHG8yNcD6sRZQLW1iqLIxwPqxFy1nR
IcOWRri/T7oeB2EKqvPgLwL11w9fALePms/oWIOrk39aOV8ywnmwFuWfDep9
aGeE818tSmU/qFfsAI7pK6zrvwwOjtaRJnMG+xh/z+JyMcL99VrkTH+DV9UV
bNVGH2vrDjYJfrk7xAOsrk4IzL5hhPNlLZKh/LTe6Q0WqnFwXvY1wnmTdP0F
b9Vu3wVXp3Ed2BMOzrMuiZSIBKdw6+84FQWOGRz18Y4GB8d5LybEGOF8Svp8
4T3vhJOMcJ6sRWq6TvKGz8HStNsLXVOMcL4kfb7Gp4IxL8Ect8USy16B6RXf
MQ++NsL9+lq0jezcfYosI5xHSddTukzOl2OE82Yt+nH9gbtmHrhfnHfasQDc
9rP0fHgRuDrLsCe/xAjnSdL1O/zQ6SkFvxDwq10vBz8eZZbiqDLC+ZF0/ckZ
mYo1Rjg/1iLvs8o81nVgJ/b+mKAG8Pk+Z7qMRrBJNPXt9+/AasbP1hZajHCe
JF2/+tr7m11GON/VIQrKcNUX3UY4X9WhX9V8ZY294B8+FaJT/eB+GZNUuq/g
FJFs77hRI9w/r0OOjHMrheNgsVWRa+8nwKtfnGZ/TBnh5xPrUGVNlh3FLFjr
vsg5iQVwt0kW0XYZPDueqdxOZrxpKq9MUXFqcKSKMP+lnWAOuswDsbvBIwvT
MfkM4PQeIaY2RmOcF+uQc7lj2BgzWDIpg5acFfwncDpwHxu41l5o63F2Y5wn
61CQvqO3DgdYTzxjxZoT3L9xZDaGF2zT+HqkRQAslDF1dlQQvBB+5DOZMLjE
zYHIehTsa/76w7Fjxji/1qHomfTKx9LG+DyhDll0TkrnyoK5iwULm5ExPi8g
fb9P7UVH5I3xeUAdyrqZ/npDESyjJZgsqgZ+y5gec0ELHLI6weijAzb6ejgs
Wg/MWmtHm2MAHkh9FfjOyBifJ9Qhe+fD3n+I4GXpVy5HT4Pp2tLOProA5j+X
pvPbAZysN9HZcQ3MgQRPpXqBKzxKS5/6GOPzCdJ4FGixR/iB1+f6fe74g58c
cRj0ugVmYsuwNrxvjM8r6lC+qVyj2gOwUUSrgFwYeL7VIvhYBDhsx8wU30Nj
/LxMHWr1+y+b4TGYdkXY5U8sWMNJT2L8GThw1Gn1QzKYl2uLeeMLcK1FWFl5
Kvh8zMEDeWnG+PdV6hB5V7bvy3SwV+08pU8eeDnn2H2jUvCj6Zpp9XKwuICR
HqoEd14YzharBl9NcGEQqDXGz8fWIfrPFNcO1IOz9j7s2vMWrGvEI7mjyRif
79Sh6Qf5jzfegS95Lx34+AE8bC/xIq0PzDlseunhV7DlKXdB3yHwRhRVyLXv
4LiO6BnbUbDMLn59y3Fwn3pxjvGEMT7vqUMKusnEa1PgNKMHfyJnjPH5D+n6
zDyS8+bAHmcuaHT+NMbnPXXom5Xe7M9FsIatdBTDMjjnMq/MsVVjfN5Dmh/X
dn8zWAff9FgPdP5jjOvPv+vv6JFwMpNNG9zq+JBNDi4OKrv+ngLMEZp6YI7S
BNefdejOw4g6OmoTXC+S1s8YbzsRGjDx2aXdejvBfK/Q6Qe7wcv5jC9bGcGW
b8h0p5lNcP1IWg8qJxZ2sprgeq8OidR3xRxhAz96V0XQZgdf7HoUHMwJFh90
6H7HC44bIXpP8Jng+q0OUU4qctMcBjvOCTUJHAF3LbE4aQiD5dYpmGyPmuB6
rg692DL75u4x8K7tfWdfHge70tZvb5QAqzDHGlLJgBk5neNVCeA8CXaJejWw
kXZTq5I+uNQg38XK0AQ/n0pab4nPWAOMwcGn71UmmYIXzrlerDkJNrc5Szt0
ClzroJVDbmGC68k6JHhVgshpCY5w5/wjfw4sGtL6sNIW3JHkcQRdBdOTFRRL
XQMbms8pi7uBI4sEO45eB3fusbE44mmC60vSeFxJ+sHnBTZp+eLK7QOO4mfd
yuEH/nTL+ME+fxNcj9ahvd9C9zHfAhPlmlPoA01wfVqHHsdsF9t1F9y7pFBJ
fQ98KrO4m+wBuN9aZO5XOPhL937OkRjwgDqNYWcimOOFyte2ZPBZ8pt2716A
Ey3KftWngr+VLPtXp5ng85x6xMUsRleeDra6ejm2OAOc3JbGl58F/n54JC8r
xwTXt/Xox84qpvvV4OmZJ+6XOsCzlndfmvaCf7537VX+BnYJmpqXGQEvKVjR
iP0Ai8fHPxKeBLut9XIdngYXmTJl8c6Cl3P1ZTjnTXA9XY84Slktty2B1WqH
/MdWwOZqbxl718BOzekp736DA/TCTpRtgB93XnuXscUU1+P1KINodvrZVnB1
v9xM2DZwlyWXn/92U/z8H2m8hrczXKMG00+1ixN3gqUWH5tJ7wYHbRNM3MIC
7mMsH2/gAM8+TvQs5gRTsAfufMUN3ptoFx/La4rr/XokyKt3NIQPbCTEYnxF
EHxD/Ju7kQg4tKR+h4ooOFnuVayEmCk+fyKNf/UDIX5xcLOKSyWrpCk+H6pH
A01EA1op8IKO7PBvaVN8/lOPqD4cdJ2RBe83paQaRGBH62jdFFVwuZvAIwdd
8K47pV+OmYItonV4Vy3AzmzHiiYswbefMWt8PmeK+xn1KIZ7va/VCpyROuBQ
eRFcLVi3kW0D7sp6GZZkC/4hFsL10N4UP89ejzaKnPNvO4JLjObOljuDXWYv
71pyBevLZQ7vvm6K+wn1SCh4uuSIJ5im90iYuhd47JCD9QUf8OkztpWdgeCO
KGsWpVBw5vCLmTPh4GDRkTrPSLCtL0/soyhT3C+oR6qtVs650WButmS1thhT
fB5Vj8hth9gnYsFfCzkXKePBpdvOveNMAD82TEiQSwK7Jgy4mT03xf2IemQ4
c0DHNQUsInuGO/wleOe9uNXXr8A/uj+3N742xf2LevSWd3/K90zwcxdzry05
YEu6Pv4TBWDW9JNdTiXgXyvR6cGlprh/UY86VbtvppaDsx8yn6ytBIcMmQgP
VIPVfD72MTeAt+4zuqP7DjxgE2Fh1wIuL+gQC2wDP6Ggp0l6b4rP0+qRu4H+
YPkHsKaIivKNRVPcz6hHZB8/bnH5ZYr7F/Wo4PqFcrsVU9xvqEf27Ise59fA
nDUBEqd+g0Nok7M0thA3vWpcwy+1DZy1ajBydDv4Yvy3RH5qIu5f1CM2Jecz
B2nAHWNb2Fh2guVEDz6k2g1O8yTsWt4DtuRob5phIuJ+Rz1iqjsTOLoX3Hxp
RvErK/jmLh+yT2xE3O8g7S+mcdfrOcBmCWXz+dxg6gapT1fFiLj/QRpvu6YI
O3GwC52Z3nlJIu5v1COB/HHaU1JE3L8gfV8nrzcayIC1kqIVFAjgosnCN0eV
wNzin8QOqoFDfZZe02mBVbhv21LpgNffMh4i0wPnODwf+qUPtqE//mzGkIj7
J/WIvbDWfNSYiPsfpPvzlBHLV1NwENnwx66TYMLzq+Gtp4i4H9KAltS36taf
BqdPh9OUnwGfi+B8m3+WiPsfDWivZE7A6/Pg1n55+ecXwAF+73/HWhNx/6MB
SfGeLYm8BJ5tmnUNtgO/uOx7LMCBiPsTDch8D92s52UwfXF8+tUr4IbTwpfs
rhJxP4L09+dt3jy9BrawSdjZ7gZOc+g9Q+5BxP0D0vU6M+SI3QDf97pl8tgX
zH3n1+rvALDTfRFtkUAi7jc0oDfhl+LP3SXi/kIDooxOnIu8BzZ42qfYcJ+I
+w0NaDxFe+xwONg3pyI4NArMXHb06GIMOKMh6ePJePBqc/+h4AQi7ic0IJUO
Ro/yJHD4J53m2efgz/2B7FypRNwPaEAuoyvVgelg2nk768ksMPFXcjF7Ljhp
/TONfj54eguzhX8hWGq7XlZ+MRH3CxqQDZvYinc1+NHRvQpq78DfxPUjPVqI
uD/QgIRkgkbS28Ae8jWSX9+D61XWg3Z3gk/rOwq7doMXTg186O0HE86y8O78
Cr530cAdDYK77O41XRki4n5BA+K8UsuW/B1c4ileRfUDrH879YLDNHgslHVH
xzzY90lwhvgvcPOzOrJLK0TcHyB9ny/+GDxZA597JfG85Tc4I8vp18YG+P8B
+TKK4g==
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxN2nc81d8fB3A7MsosJVlFkhWS6HySvUKS7CJ7r5SRVCpJVkhZFSFZIYSQ
7JC99wrZhIwf3+7jvn/+8Xh63Pv53HPuOedzzvuF/Ya95k0iAgKCL8QEBLu/
OZ5vvo1hLT1P8N/PHPpMfuKorUUsClD4dFpMdhaVuqe947FIR5aOSQvpR2dQ
qNiIPnXgZ7Scr3d8zPQ3qhB0NCez+Iqu0dmF3emfRp6M23nbcd/Qizv9krbP
p1F4iOz5jWeVqMjKh2if7jRK3xfwbfVOLVprmk8h3DuNqgKaFJbNGxD7txCH
ty1TaO4B1bh7yk+kuHv72Cnk9S39xJ+4ZuT4tuXvmOUU2kt02cY1ohU9PJzQ
d+bSFArHVtIWn7Wj0vtMj3i3JxHn3Zfzjg868c4okhSZu9ONWnfe7TEyiSQ3
+t3sHHvR5tQjgSPpk6ha4n7+tHk/ojXV2WnBJPogSe8tmj6AjvXwLBffnkTz
3aaxLimD6KzWWvs+o0kk7pFb8ilhCG/vQ+RDC3HDeJfnXyMWfj2CrstERWee
mER7r33gcowYRdGplHLvOn8h9dUN2YyQMbwjItTMZ5+No0yu3Rv+QjXB3Y4T
5rNIyva5/kmSX+hxZHh1qNAcumkgyPGjfgLxWSDd0+nghjMTk01883g77Qn2
cEqZR7dbCUhZsycQY/tZKjqeBbzzEodeZyYsoPjv8TVfvSfQlqxI8VzcIqrO
kQ66rjiB4hl71YJYl/CWGX3YL/B6Cc0nDF8hZphAE9n8Dg3My2jnYuJaa+Po
6YN2AvsIML+WTzAN4wreTZwnONJCVtApmitby9/GkevizyzV/X/QBb9jg3LJ
4+jgtzsXfz8DfwnhbAmgXMXb8EadKd+TVbT77ojAcUQo7LpcS7aGLN0qEiec
x9E7QlY/6wdg+Z8VTJRE63hPxtm/T7m7jrxmwp+cvTaOAh0OiittgoWw0qpf
d/7i3bLP6tqTVbB7P90kj9sG3ofTv9ypWtxAwWbmNv7nx1GxtymlheMm2h2N
3Zzj6Loa9es9s2AS1ly+9zZbKF+bXJiPYhy9/21YJDcJViraozZmvo230PaN
ZaY5cACbUT2nJAH2o76DwWtmDPmUUnFI+oBdbhS4apUTYDud9edH8xiyILao
tiEnxHYGbxdr/hjSf8d45KEKIUZxRqnIPmYMqct+c4gOIsSOpB+KK7k/hmTG
HMpzWggx2dgvN2+ojSHxR6wH6w8S4c3HU2c9pk+E6R7YXRHGEFv17a9bcUSY
3e7wZB5D9Fbc9AdGwWSUrWYCJ4jxXv/gWyBvC55REaQxzgQP/e697r5MjPnu
2R0ho6gt8GlO0FkSvGsEzlIke5FgKTutW6kaRcWNY/qlpSRY07jdy8jQUZTl
GJbRSUqKdyKdNMmCIjjq0+zVvYHgQK3oDxxN4HvLStsSTGTYmBHy/OU+ilzC
VzUv65Jh6zuzWcJwFFmcSUy0jgHrd1xevz9EhnFUZezM2FGkfptQ7fXxPXiL
f9FfrksDs21+fr0pRo43Q8zNOUYPMDmil+H/Ct7oL4mQI6bAe9bHbspQngIT
w+7t9MhO/5RVhzxvABeTHJMouboX76yEpmcdr8CJcj6Dc/3gqPFTohRclHgH
Pu5+zG5BiSnlaUx6LY4g3xNPes6mUmKGu8tJxwhyqxET1JyjxJx2l//iEWRl
PXLfSoQKbwOqkHZfd7D6R3TyVSEV5se2u6CPIBm1396fCKjxFp+NaqqVocai
IkNdSx+PIL4gheMjj8FsQiu3N+rADE1vfzDQ0uBN7qzBfuoKeIN+20X2JQ2W
tn93AR9Bc9mpVQa94JEruixu7Puwssci50wuj6COlT0OgTfBtRE53xKTwT+o
xShIDPZjbbvLpfgIalKmi6z3BHc8mTn+8jW4r7Imx6RwPzbpvrvA7tyP9L0M
fw948uL95tW/+7Gtud0FdOfz3TO68e0wLUb33wI1jFa+npt/dg68sXnAR0eP
FpO4tjvhhhGR5BINpweY/E5j9O8oME1eKl9eAS2m9nN3QA8j+pXHX3y7wLwz
ayup1+iwG4q7X/AwEuRre3jrNljMKotB+iVYMinwLVU+WHrMSri9gw5zK93t
oGGkwCVfGr8KVrvBqW5zkB7zP7v7gYaRVtx2n5g4+Fpfty2hDtiQJW+j9hbY
VDfsaXgE2CrS4dD1z/RYTOaJ9Z5Tw8ihTSX5ZDvYU5O0soSJAe/H9UUjV7TB
gVRRzmxu4DAlN6KpF+Cox5rBOTkMWNYu6YdRbAU/m08rOEV6XIqRkRHv3OJY
vRQtcOGGx6SLC7hMQuc2CgNXuYuQ780G1+fuj2hpZsQqdh+3q0OoZWn6WOwi
I9bF/OpNQ+8Q6hKuzrakZ8J7wCHhoshpJmwm2Poh27chNJp2r2lLEzw5bXC9
2gk8xysxFxoCXrFgumuYBd5IXKA+0cSEEe2VtHBMGkLknB9OFtMewJsh1kTx
sgZY+rlsyftLBzEmXyrlsmdDyEcpO7nJDlxMyhm6+Qy8URLsyfMRLOFJYHa5
7iDGu9t85yGUu9ArnryXGe/Tll8otxXAGf2RfVqPwHzabpkp38FWtKNRrSPg
pLrLDwhIDuE99qjM9iTnIey808edGT+EuC4KXdWWBt/YisXuXT+Eae6sbtlS
Qygun4Y31Qfc5+JF3x4LZhGc3iD8Co5MrG64uglmPPL+zcdzh/Gm2XtD4Voe
mOwPywyJKAveMllP2wW0wL626yW6zuASHsuUhyEsmNkNtTZSziG0NdwempEJ
loyV8+puBN/RzTEjm2PB7uw83bXJh1AeI5e60L4jeP9pDDmrzw8WCyDkfKQK
dpF3oMqyAWcR9S/3PAXPFan27/lwBAvUnH31/vcgshE5mWXwCzyRQv7wEzcr
3sfNbtn1yYFN2ceuUpiB3/RoXRB5CB6I+MZr9I4Ve7M7HZoGkT5N/Gb2ELjz
gXfjXvajeN8UWKcWombDcne3o3mDSOQRoxSBAJikX9CmQR087V9M/Pk6uFlM
5VWME7hgqFPY7z74TaB5jW0YG1ZTYLyzYx9E/hLL168ksGF9wkLcU76DyHHM
d00yF6wTsj+YqxKMnY/hoeoA80yeLFmcYMMWdk43khaDaH94/tXuNfDqBfnZ
sr3sGBln03SA6iDq/93il3IYXPHyBmsIHzhNdi7nthQ4fN5L9boa2DuaclTB
iB07tLt8CA8iM8WXnoIOYNXl4wwH74FF4rM/bAeDWVSlL46/Ycf46Z2z+A/u
9OdaQ1f9J3ZM+unFF3c3B9DUOwOn3HJwk/oURUwruGDDPf7hGPhNEtlZ2z/s
mDYxg3vj0ADy1wpr1CLnwPtaavo2Jy8HZuUxosteNYAwHakIynNgHpJa/kVl
Dsx7Z3Y4fRxA+zN0Krr0wat6YwZltuCBPS7Lyd4cWOLu8cR9AFV+InwW/Byc
ZvSc63YcOJzySKFxJtj7c8plhTLwTRPxKYFmsMq+Ct8DI2CRL5cPbS9xYAW7
x1+DAURCb69Yz8SJd7OVv3u0OLiA6eD+h4rgN2UJ7210wf52p5GWNdjpUGnb
OU9OrH5nt5sjvdP+mj8iXV85sSHlyg9kPDvtd31YV9oI7menN00eBFf8iPsb
tABOu80f6k7Mha3snJ6uUu+0/1ghrzED2PunYpn8MbCZV/s1ATEubPfbUh/t
R6onbs4zyYNJshOZhf3ABecnLqh+B1vEr1IytHJhu0+ThfR+xEhC0dY1Ai4z
Y46LXwI7VJ+wsiA5hv13/L7Tj2oDlbaWOcHHtaxD7l8Eh1rODOWXggnuOp6e
Q8fxzqX4pEd5F2wTtnT/eDG48hrjwexeMMdRsdQLm+DGe3Ju5NTceHuPaGMN
LGA+efO94Xzc2L/6SD/qTL7Voi/JjeWI7xYA+pGIfaTFpB44SCR/45YH+HxE
dcX5p9xY7255oasPTa11BpG+AkfqT+rWpXBjpMzhDw4n9CG5r+tcoQXgDUVJ
1bQ1cFaLl2u1OA/eJvqfeoJKwQwjExd1lE7gPf3+/p8vgeDv1qwfjjaDC1lI
I8VHwFk/ph5oLIOTvJscrch48Y4RyDe8f4AXO/XfAbMP+Qf7ieecBbstXqYb
1wPfuMI+fdAbrPZ55rtSHFjGojXLJBMswVwY61kGFqx5E/CiGczt8eR22ggv
dmW3/CLRhzqIvg642p7EvH7tbsD7ULlpQMH75+DMimthnZngpFvYvYUycAwP
tx1ly0ksofO/DRkK66TW4xo9if2o3n1A9CJ//yV5qRXwDbXnf+Mk+PA+R8eb
TnIXXB+Y7KNKegpvY8oTmuFPwQvrOjZGr8EPJh/78Xw8hf2rr/Uipq68uPki
cHL1REFBPXjhURJnPy0/diRlY+qRwM77b3VIJXGAmczJdRxPg5O0xZ0kZMDn
5CwCiK/wY7K75ar1HvSAhGeZO5Ifs/U/f6u2vAcxLV3dN58EThp+dKIgHyzR
/Pni/Rrwj7JxA5Vufuxf/a8HLcTLh/RtgJnuva9wYBXA2xiZC7y4Dk7ePB6Z
/w4s+Vs7yzdHAPtXP+xB9T1+dcoVYOO63DGGdvDClzGCvnFwgOrbQ3kkgniz
SjWL3GMES7OctqQ/Azb/GxKdoAM+qLAqtnILXBVm0CgXAV4az105FCuIje48
vXZO7Ijt3P4js4mCGPXOblhzthupBFpe/JYGdh8ss4zIBTc+cs1FFeAT/DzE
E63grjvPXosvg/0rF0SfMAjhnXtIRd+ARQgT3Tm9LuV3oyHbBF8hLjBN6VYS
KR9YgkGnofM0OKRgL4vvRfCUcZEF72Xw648cRB5OYJX1R69qg8HuqoOlsS/B
7+IkJpzjhTCDkyQ7K8RO+xZDaRSSwRtyv0VYMsFav2PvlZeAP4Zq1ts0gmlO
HSGk2SeMt33F+Ol0VfD+Lw5vkw3BGelrdO/swQS8xUrs7mCNd76+MT7C2L/6
cTd6wypfcPgJeCGSciEyGOxmLZDh2yqMfdwt1zJ3o4rRxfHtXvAB47yjXmPC
2L/6chey6PK8uj4DztO68PzWH7COYs2WI/lpvNekLtvZMIOV8g4k/mIHRwn3
9JrxgidT4xhHhE9j/+rXXUiC+6bq9XPg7sMzhXoqYM/9t/i0DcDFa48ple+C
CYajJlE8OL6dU1ciCyxdl1ot8g0cIudImFULHioRPSvQAhY+t+6Q2nMa+1c/
70L3c4qTToyC/XXJjm3aiGCqdbsL3k5/ZB6xzAgAHyMX/WiSCu7olfBWzwYH
fMIuSRWC0RM5Nt5yEcy1cHdCdqEFQ5V5pjrwtb06oXPd4JIcE9GaKbDLU0uy
z4tg7uv27W//grvEXJOCiEXxDqTyuO1FKYr9q993oqXPfoevHgbrmYQUCZ4E
r+wvlY2wEsW+v/7vD8igsG7c4Q643LzjiZI/+JZUn+6ZEFHsd4Dqz3G7TsRL
P3KSKwrcN/FrY/8bcHDx7I/NZPCq5V/79nywIeMeusxqMN0U1XD0T/D3Erps
/06we/jBh7cGRTHG/wrenYjPhlXb9Bd4vUw06gCFGN5VzKp9NTxgz1nN9M+C
Yti//KITCXzX8XknDh6KMtQIxsDhDqYc3grgjcMO5Vd1wCaVHmZCFmA7+4a3
OongOwc4B++OgD0DflTJTIO9CN0zKJbA3m4ckfV/wT5TdXdDic9g//KTDnS/
lf3SEXqw31c31vcc4Mci7GQ2vGewZ7vd9bIDPUmu/S0ofAbLkdotOHQgf1a3
1uWz4IBQtqKCC+DnXq4BMhrgEPMavXpjcMpnxzaWXnDpHmYN62vieN8OqHPm
NT+LtxCtT/gvFwm8C5/MfilbACsQGQ2+cjiH98+1HOfb7mDdeSqyqz7nsN5T
uwfADjQ0YRIp8hhsPVDASxcE9mywuPQjFhxYzOTyOB2c+dqpaKse3HKnnsx1
BmzgdOyl5gp4zNLzpODWOexfXtSO7K43F1GTSeL9R4dXfYoa7KN+b6iKEUyu
0OGSeAQcjAT2PDgmif3Lm9rRoTN+L6+fAksyDg21q4CNFqX41GzAVHQEjS0u
4ALBMmc9L7D5pQcHhh6CGezkvlgESmL/8qF2VBpAbjQbDrb7UEPkFgs+XBOQ
uPFeEvuXD7Wjqgk1pfsZYE+Tq53RTWDBPiOLvCWw/+GR9O+kUniP6Fj8aWIC
B9/ifXXtKPh8+PT5AW7wVHbakJkgOLLZwe+3uBQuT2pDKmq3Gcn1wATV995x
eIEtikPKrpaCGz+9HQggPY/3A/5U+/fcYPHk7K1SRfBopdsbBU1wyJi4XIPu
eVxe1YYQ6d9fV0zA05xFz3qswXLXL7T+8gTHxXxn+fMMHBBuTOaUDnYP/Ds7
3Qh2VrmRotwJtttbbZoyeB6Xh7UhyyqBoxSTYFO/8E7zBbAukanaMWKEt4a3
0LchejCvnXl4hzaYyDDasv4lePMwCdepN+DVTqu+pyngxYifkZNZCJe/taGZ
K+KXFb+AR36SVpHVgbtVmyV3tt14N1XHZd77Da6StTuOtsBD96zm1IgxvPsH
olW994B70M+Uj5TgrhgS8t59GC6va0MV4bHzV4XAWYES3U2aYN6lrhNUTuA3
1zzcZYPBBM6cdfQvwYYBtUeH4sDUL2MVq9+BCxOcnTOSwNZZ8tERqRgWfndz
LmG4FR36erjSOwNcXTs7dzMb7N7x7ZBqHph7NEJGpBDcNm9td7gEw4rtY3Ll
01qRCCVD2a9KcAhXIWNeA9h3diOLl+YC3s4FUurRKmD3c6aHAgzAnoX+I3fs
wEX6DBG5TuCtjWjFBTcwFs29ccoDfE8qM83y7gVcPtmKSLzL6Qcfgf2K2911
gsD+aEtaPh78vISLWiwL3Gic9tUxF0xHKO70sQB8Ob6U61cxOOyCcjvXtwsY
jfrAhacXWxGTr6Hk61pwZJljPH0L+EMFZU39AWm8i2sSFp7ogTMONjp6GYHf
mq3POZiAw7O5HEzNwY+JLs1etZbG5ZWtyC7m7e/zzuDLEqtTxzzArE7xE4v+
4IlkpdHSKHD3HxfTnBhwvWzscNIbaVze2YJKQqtvvE4EfxpcHHyeAo70Uhhw
ywJ7M0f3GRSAHcwrDTSKpXF5ZwsyyZnvkSkDaxOz6ItXgBU05LpP1oDPxTro
Hq0H8/+O6qRrArOd+65D1iaNyzdbEP2T2fa1TmlcHtmCzluE1QgxX8TbQv5s
kaUOmMhdNN9qEPwqSSjH2koGb50vWhOpH8FM9bcOz8yBXa5S5ATSyeLdPBCl
JiAC3qL9cd1EHMx7cdslQhKs7SL0uBaTxeWhLcg3weTVtgy4a09VqbkqWNiK
b6LhCtjwleFfYl2wf10QjbghOHezjN3mhix2/N8/RKBB/mWRODOwePA1PXJ7
cNBi0T2HW2CJBmbP6SXwaIqrm4WTHN7f5EIifX3l8a6R774g8wbcpMA1RVoG
ZnjidmWlGqxdXfV17Cf41q/5pb5WeVxe24wiKQ7ztneC80/IGDX0grsUbcMq
B+Vx+WszMqyhtUyaBw8p5Uo9IVTAe1J5e0yJHTyvohBEdQFMZ+v4nUQWLPws
an1DAXz54zeBZRUFXH7ajFx+TJv+VgfnUqOGXh3wqmrw2XpjsGe9KE26A5jg
UtfQcx8wG03VCFsQGPuRM5YZCyaXEuIOfwtuTE01v/MeHMnCk2T4QQGXrzYh
44C3E9Lp4DnrKEvKz2Af5eDJ5mJwSbXNzHIvmEBBYeHA5v+9XmZ7Te+cIt7b
WC5h3G1wo955ZbNX4Hi3ijC+IvDeB/75++rBTsFqfQt94OORGQ6m4+CuGDri
tlmwyJuLdTRL4MAElxfyq4q4fLcJTSQlGPpsgC+mtnHnEyjhPTo4ViArA350
4I9q0yNwbrdUQlgEeCT2wYb2e/CcunaI/AfwX0IeHvF0MNmntSKeT2A609rL
zJ+VcHlwE+KtsLu7Xgy+wEP3obsCHJMRe814DPxX/BT5KKky3nSvGk9XUIN5
N52N3jOCxdJklyOYwReMDjx9fASssv8X2212ZVwe3IR0SgtyLY+B/R4S0vCJ
gnMUFW7OyIBL1pn/9imA6z5MBTWoKOPy2CbUoV90vEQdPEL9vDBDCzxXbKwZ
r6OMyz9/or/2whPB+mAydhJvX2MwXVMrvbMpGAtnsRZ1AdvrmpT9uQ+mip0c
kHwMThl23L4XoIzLN38iBZ61I5VB4DEbH0mqF2COlcDb4dFgw7vRuWyJ4Nbg
AkHRz2CVd+0pilVgiWraWKdJMM+McugrKhW8YwksqTOOgJno/R6V84M1X4eV
q50BPzv2lrATgXmteNlYZVRw+epPVJWWed5EAWy2KG6QpAImES/x+K0OXtBf
t2dyBg/cEzFFL8B39prHmh5WxZs+9GXXk3gwwYHASr1k8HSUb/apTPBQz0YK
Uw64k/VW/HYeuNF4PmKiEFzxxjrwZ4kqLr/d6Z8ULQvXRrB7lpQ08wCYt2zf
ivE2uOfnYHISqxregYOfDOakwNj8Q1pxA7DYaQJy9utgPtc7WxQ3wRyfl5YW
LMDMa3ZT3TZquDx4Z3x6mXR8dAEvEOh8v+sJriO/EMsZAE7Yz3u78hU498uT
W9LvwBVmv1yLUsFqkszL6xngdlpFF/EcsPG4+6JrvhouP25EE4VJTp+KwHvp
LeyT68F8ltw2sf1ge8bEm08JL+GdVcpldIsTfPYQh+Ylc3CJ01FZ7g9go0Ru
Is9J8PZ0hNEEgzre4g4WH3oPgp0Wxf80sYD3ibJH/2BVx+XVjSjVjeJiFRtY
MW9+oowDPLbWGVjEBWbzSunK4gHrEngcT+ID/7lgUveGHxx2X9kpWhAs9P30
wUhhdVx+3YjqyViKQ0TAufSGv81lwDFscSxSWmDjitGabT0wh83J22UmYGKk
1vjWHDxC68j90Bqs5UHU7GoL/j4S6m1mr47LtxuRmNox3quO4MTPua3yzmBe
YmnhH77gNLUfgZohYNY8Q4mLYeDn7HOjp8PBBE/vBXNFquPy7UbksEQnxRgF
1qgUDVuJBgtH6Uy1x4PfEE+GV70F09t6SOcnqOPy6wb0oI1qJvk9eAnFvIxK
BrfSlc55fATnjg7LG2SCJYTs3w2VgIs81wksGsEr6WNzvk1gweGmgegWdVz+
3ICsmL425rWB3yl+KGnuAB/IuB9H0Qv2Z9L3QYPgTU8RY9dRsMMwFfbhFziF
aU2gYgo8rDh6dPA3mMXr576NWXVcfl2PtDOKtpkWwEHDybNCS+BqpvB+lRUw
kZJvg/kqWNLL7qvvujou361H6cNysXlbYA6lo3dniDTw1veitKcg1cDlt/Xo
RcYfQ649Grg89QeqHx5WQxRg8gON53UpwdJKhfyu1GBPryTWoH3g3Iwwmg+0
Gri89AeaHfbZ+k6vgcs761BbhlCxEAu40GvIK5oLvJJRb5t3XAOXF9YhgZEC
g2YesMWB96ozvOA3SqFSFKfAjJnWR5AQ+PEBmU0XUbDdyFLhgBRYKzPBU0UO
HDgSbGOuAK484K3vq6SByw9rEYGylUq0CljCW1syTw3skinN16wOThvhZ5nR
BE8cOExFcUUDl6/VInblPRucV8FyRj5JtHpgK+c1rW1DsOem6MkVY/DzR06E
v2+A39Cmtw+bauDypRqU/WrqY5cZuCPdVLfKCrz5rZcs1w68X+1Qb6oDmKND
+9NbJ7DIjdAnUS4auDypBslNNxgFu4E7JLNpFfzAVs8iv229AH/K8WfpigZv
9Hq65iSA2ReW2d8m/9/1yezrgz6CdYI+vHuU/n/XPzRxxzsT7PmOS8P1kwYu
T6pGz/mvc9vkgDnuynZyfAdnN5x42tnyf6+3GzEaGgVbUceKTK2A2XN+WJ76
C+7Q34ix3wZ/ygjNDyLUxOVD1SiQ5GRLJjHYSqdspokULJt6jWJpDzjrb66z
+34wmzJD38ZBcEDFliCbgSYuj6lG+o7RIgw3wadYJMXJbcFDFZxnSe3B4Y6U
EkSOYCWWRYltJ01cPlOFtiq6zm24gM1YUqRW3MH1jrfRnCfYvjJXriMAvP/I
kmrJa3Cmk9CVpFSwZpWdflAhuODIeUP/EjCHM7Xxg3Jw25Fl43sVYP+qnuve
VeDzzuU3PGo0cflIFVo4kmriXgcuq1Iyt2kBhzr/sjLuAT8uJ5YqPXQZb09G
1n0c18DJJ0hrXAbAZEuEzKWGWnhHdX/+3mMP5v9m67TqA17NrVLwewIuS+E8
yhACzjYvCDsTBn7PpbFXL/z/rj84ftc7UguXn1SigBjv5fgosOPB1IGJGLB2
SGetwFuw93XZY+bfwe8FM71jxsEW1R/HfvBewfvEjRS1TVswE0ua+eVnYKK2
TJ/kVDCm2nQxLAPsVb5AdjcbzEJw38IlF1xwjr7GMg987dbbk0YFV3B5TyVa
zTr9TKsQ7BzvQs9bDp55nvNyuxbMt6dNf7IBbOm9crS1GUxe4HevpvUKLj+p
QInLTMNf28GyQu9lcjrBIzZnElO6wRwjVy1f9ION9dz5fIbB2+Hkga6j4Jim
yFmrcbAkzQkN419XcHlFBepWzM+6MgU+5Eo7pLkB1omzpFWn1sZ7NYcxuZ4R
HFFbiqmygrcaU8ds2MBmbREBARzg+m5f4VQubVweUIHEBm07ao+DyaYvclGe
BLetMDsoCYDdqCr2VJ8BM3I4xcpj4BE+hSk/GXD2GdYzFQpgFimK3lEl8APp
JV9SVW1cvf47mpbv5zl2CaylWlMvowEOdefYunAD3PT2zinkDO4xF5z/EwIe
PTmWnZEFnqQuZXpWBp6ZfeVu2QS2T6ILNm4Dzxk/Sb7aBRYqKhe93KONq69/
R07MBGVqfeAs13NqSgPgxZ9uXbJD4BVpU0qRSfDqJw1JjgWwp9iQu5bgVby3
85xy/OzAyoJysp7L4EoDAUtrZx28fbK+BgSFgyX2qGfk5IN/0pZpHSoGW7CI
rHmXgbPZbZUzy8EE3InRwxVgFb7+WcZqcITQQWmFWh1c/b4cVcht+NO2gJf0
Bpq7esDYdebj1P06uPp7OXpqpumOBsFt1k9rHIfBHI7lLO9GwQUeYqXkk2AN
v6SbtjNgn1cBaWJ/wGkZDn+2t8H/A3wcIS0=
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->{{0, 100}, {0., 0.18287852112676056`}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.503813069703125*^9, 3.503813388171875*^9, 
  3.503822675640625*^9, 3.503822726609375*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"For", "[", 
  RowBox[{
   RowBox[{"k", "=", "0.1"}], ",", 
   RowBox[{"k", "<", "500"}], ",", 
   RowBox[{"k", "=", 
    RowBox[{"k", "+", "1"}]}], ",", "\[IndentingNewLine]", 
   RowBox[{"If", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"Abs", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Length", "[", 
          RowBox[{"Select", "[", 
           RowBox[{"ddiff", ",", 
            RowBox[{
             RowBox[{"#", "\[GreaterEqual]", 
              RowBox[{"(", "k", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
         RowBox[{"Length", "[", "ddiff", "]"}]}], "-", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Length", "[", 
          RowBox[{"Select", "[", 
           RowBox[{"dsame", ",", 
            RowBox[{
             RowBox[{"#", "\[LessEqual]", 
              RowBox[{"(", "k", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
         RowBox[{"Length", "[", "dsame", "]"}]}]}], "]"}], "<", "0.05"}], ",", 
     RowBox[{
      RowBox[{"Print", "[", "k", "]"}], ";", 
      RowBox[{"Break", "[", "]"}], ";"}]}], "]"}]}], "\[IndentingNewLine]", 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"dsame", ",", 
      RowBox[{
       RowBox[{"#", "\[LessEqual]", 
        RowBox[{"(", "k", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "dsame", "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"ddiff2", ",", 
      RowBox[{
       RowBox[{"#", "\[GreaterEqual]", 
        RowBox[{"(", "k", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "ddiff2", "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"dsame2", ",", 
      RowBox[{
       RowBox[{"#", "\[LessEqual]", 
        RowBox[{"(", "k", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "dsame2", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.503787906109375*^9, 3.503787954390625*^9}, {
   3.5037880969375*^9, 3.503788165328125*^9}, {3.503789282328125*^9, 
   3.503789323609375*^9}, {3.503789362703125*^9, 3.50378969828125*^9}, {
   3.5037897331875*^9, 3.50378973346875*^9}, {3.5037898018125*^9, 
   3.50378980375*^9}, {3.50381114771875*^9, 3.5038111570625*^9}, {
   3.503811206046875*^9, 3.503811246234375*^9}, {3.5038115053125*^9, 
   3.503811512578125*^9}, 3.50381156275*^9, {3.503811742578125*^9, 
   3.503811760578125*^9}, 3.503812383734375*^9, {3.503812862203125*^9, 
   3.50381289703125*^9}, {3.503813142078125*^9, 3.5038131741875*^9}, {
   3.503813235171875*^9, 3.503813247109375*^9}, {3.503822750890625*^9, 
   3.503822754125*^9}}],

Cell[BoxData["9.1`"], "Print",
 CellChangeTimes->{{3.50381315559375*^9, 3.503813175296875*^9}, {
   3.5038132405*^9, 3.50381324775*^9}, 3.50382276225*^9, 3.504220791140625*^9,
    3.504221170859375*^9, 3.50422146684375*^9, 3.504221507234375*^9, 
   3.504221668265625*^9, 3.5042539685*^9, 3.504513081625*^9, 
   3.504513512625*^9}],

Cell[BoxData["0.8143322475570033`"], "Output",
 CellChangeTimes->{
  3.50378964384375*^9, {3.5037896855625*^9, 3.503789701109375*^9}, 
   3.503789734671875*^9, 3.503789805359375*^9, 3.503806899828125*^9, 
   3.50380712496875*^9, 3.5038111629375*^9, {3.503811207578125*^9, 
   3.503811247015625*^9}, 3.5038115164375*^9, {3.503811553390625*^9, 
   3.503811563453125*^9}, 3.5038117659375*^9, {3.503812372515625*^9, 
   3.503812385265625*^9}, 3.5038128093125*^9, {3.50381314678125*^9, 
   3.503813175296875*^9}, {3.5038132405*^9, 3.503813247765625*^9}, 
   3.50382276225*^9, 3.504220791140625*^9, 3.504221170859375*^9, 
   3.50422146684375*^9, 3.504221507234375*^9, 3.504221668265625*^9, 
   3.5042539685*^9, 3.504513081625*^9, 3.504513512625*^9}],

Cell[BoxData["0.7337262255558532`"], "Output",
 CellChangeTimes->{
  3.50378964384375*^9, {3.5037896855625*^9, 3.503789701109375*^9}, 
   3.503789734671875*^9, 3.503789805359375*^9, 3.503806899828125*^9, 
   3.50380712496875*^9, 3.5038111629375*^9, {3.503811207578125*^9, 
   3.503811247015625*^9}, 3.5038115164375*^9, {3.503811553390625*^9, 
   3.503811563453125*^9}, 3.5038117659375*^9, {3.503812372515625*^9, 
   3.503812385265625*^9}, 3.5038128093125*^9, {3.50381314678125*^9, 
   3.503813175296875*^9}, {3.5038132405*^9, 3.503813247765625*^9}, 
   3.50382276225*^9, 3.504220791140625*^9, 3.504221170859375*^9, 
   3.50422146684375*^9, 3.504221507234375*^9, 3.504221668265625*^9, 
   3.5042539685*^9, 3.504513081625*^9, 3.504513512640625*^9}],

Cell[BoxData["0.882640586797066`"], "Output",
 CellChangeTimes->{
  3.50378964384375*^9, {3.5037896855625*^9, 3.503789701109375*^9}, 
   3.503789734671875*^9, 3.503789805359375*^9, 3.503806899828125*^9, 
   3.50380712496875*^9, 3.5038111629375*^9, {3.503811207578125*^9, 
   3.503811247015625*^9}, 3.5038115164375*^9, {3.503811553390625*^9, 
   3.503811563453125*^9}, 3.5038117659375*^9, {3.503812372515625*^9, 
   3.503812385265625*^9}, 3.5038128093125*^9, {3.50381314678125*^9, 
   3.503813175296875*^9}, {3.5038132405*^9, 3.503813247765625*^9}, 
   3.50382276225*^9, 3.504220791140625*^9, 3.504221170859375*^9, 
   3.50422146684375*^9, 3.504221507234375*^9, 3.504221668265625*^9, 
   3.5042539685*^9, 3.504513081625*^9, 3.504513512640625*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"thd", "+", "k"}]], "Input",
 CellChangeTimes->{
  3.503789479265625*^9, {3.50379107184375*^9, 3.5037910725625*^9}, {
   3.503811256515625*^9, 3.5038112568125*^9}}],

Cell[BoxData["20.350000000000016`"], "Output",
 CellChangeTimes->{{3.503789480390625*^9, 3.503789501296875*^9}, 
   3.503789683125*^9, 3.503789726046875*^9, 3.5037910745*^9, 3.50380690275*^9,
    3.50380712715625*^9, 3.503811257421875*^9, 3.50381237746875*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", "dsame", "]"}]], "Input",
 CellChangeTimes->{{3.504413122984375*^9, 3.504413136359375*^9}}],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJw1WHlcjGsbnkKW9CmVIjRCklKdSHHS1S5LZtqXqWamfdpmJrSgXqLskpxD
yBwqJ2vHdogYRAilTupkaSh8hVD29fP9ut/+6Xd1v9dzL8+9PY0Tp/hEq3M4
HFs1Duf/v/t+Xjv1fG38WNb7zon+gIn2/Sx0yw3QBwfBa7n9jcNHuIS1YVO/
/mvA3X/oez30Xz2ry2ZqD2FDGPb/TTZaxJ43GuWeC8J0XXSIz4Wls3HmyUXD
CZtATX1EwZVHRoQnwGnqCM0MrzfEN4Wjf/MnR716wmaw1tRfwwtisTl2WOsf
Guw9iPgWqNswMI53YSDhqfgyQ1Gy9OAIwtawQ/62utm6hG0Q7aPIcgpm7fkF
i8ZZmKWd+kTn20Jzbf24FkPW/2lY4ve+flPDaMLTcTnQx6N5BIvtsMvnicso
IevvDHgZ/fZ1VvZzOs8eDvskNrL5rH8OaEzbc0IyX5u+n4npHSdcz5TXkXwW
Cqq1tzdfH0zyX6H5fLKgpof1zxFaC7Su71R/S9/PhlFNgV6N2hfCTjBZ5e7d
aTmOvgeSqs3c085U98kZoMrMxLiynENyZ5RuXHdNdqxfH2acEXbplPpXSzZe
LphofebelaxHxHeBuZ18ztBNY0juivKa0XcdNXtJ7vpT3j/Y4xPrvxv81r9f
Xr+b8oNxg9bkoFEW3lrEd4dHpml7zS7KB8Yd/fbN4k9fyt6HB8Yx2waq81qJ
74HXup7rvz/rJLkntt0pLesdSfFiPFHdlSo/8JG9vzn4s8E3+4HuKJLPgY7+
cXvuJkOSe0HceT5S8v4/JPeCzuVWNduuH3T+XGSfEtmevaVO8rnwLbyrrDrJ
5s88TH+xe5+5go3PPDhu+O1yokCD5PNR3D5N/V0Fy58Pp0XXxr0//IHOX4BV
B3oc2x4TZhbAptG2X8OKbyT3xnfPlYn87ick90ayq7vu9sLPJF+IwRdMu4rv
0/fMQkzIm7xuKcPaz4Ofm8F7ZfmWPgwe/j6y4kHrsYf0PQ830irOnkmheCp5
WLv2yUB+3TXi8zHs97e+IR9biM9HQadNxoChKuLzYfDxVcvJogfE5yPSrB38
VvZ+fLC8dGmUVnsN8X0QLi9OD/Ck8xgf5CXk/dAZ00Z8H+xvL7ZoecT2F19M
TemY2Zl1n/i+qJ4zoKzNic0HX7yLyH832OgO8X2RJpF66ju/Ir4fAitW5fY+
pfPgh33DvP5K3kb1w/ghY2n208URN4jvB/4Il9BG/2bi+2Ok3uCbuVa1xPfH
wTzxw+rEi8T3x8YbWQMjcyheSn9cVuSYewx7RvwAPEwMaOqIpvxEAK6mPY58
MIn6FxMA2dY1pi8vDOjDygCsjDRdWy/4SPxAeJv5vTB/Sf0Xgcg7pGG105TN
h0DcGDJ0wIL/0vnKQHRFShmNHWx/DIJnmdGJmPGUjwiCW5uXVs8QNt+CsPBI
+qsM4y6yPwgrtnU3jetm+cEY4W3Vs7SW+g+CMavhzti0TLKXCYav2xQj58OU
j8pgJBS9H7PBdBjxQxBv+fnHyjaqd4TA9XmN+8lETeKH4EpvvGyyy3fihyBb
NSXN24TukxOKhfnvHx6oe0z+h+KvzvZVA3hkDxMKF/OXt0JvNxE/FKfOyhYe
jSD7OAJUGdrV7d2vTvoF0Nvlf6Tukx7xBWjj8My2//sLxU+AAGbpjm8T2HkY
Buf0mc4BY6cTPwzNma88HTOofzJh+B6uOf/4Slvih2HSQE7moV+oPjjhUI5f
537tIvmDcJT+WSq9sJfymQnHAdsd9yvjqF8pw9ExwWf2cju2f0WgYIbBU7N5
hPETZ3cnZsyg/sNEYIrknppDAs1HZQSG53mtzq6tIP1C2N1syDT/g/hcIWJy
JFaXFrPnCbHzfEbxkhWEhUIU//0lq2ctzSdGCJWIufCKzW+FEBuP+fP2sPuB
UoimPMXII9mEVULk7rDg/9jM2i/CyjBDw6m5NB+5InwSS1e/KGP1i7Drh9Wz
4kxWvwgOc3aXL88jzIhw/tnzk361ZI9CBLUdZ79X3LpN/opQvOOKRmfq331Y
JYLkQP8HUltj0i/GVP6anJ5TDX1yrhiZ5xRfnwaTHGJ87d66fVLrWNIvhuD2
xQKhDlufYoxIELS/Uad8U4hRVrLzuacR9ROlGOvyC9wWu9O8Uokx4VYIzzKE
na+R6DHnpdrYUz1wI7Hb5M1tx1VsPUfC39vo9DyG6kEYiTC1PTzhSja/ItGR
HVi+7fx7in8kfH5lmn2KX5D+SDQ/4psfmU18VSTSDBzuPrjN6o/CIKfPLrNH
Uj/hRkFZ5lGaY0b7CKJgaRdbtySC+oEwCkYTtMOM1NVIfxTcBv/zEbZ0f4oo
8O3V0jMLqP8oo/CyWWBeoUvxUUXh3fTuJY/PEJ8Tje2BT+8Ke0kfNxr8aUer
ixLYeoqGZaK+SW7rDPI/Gq5vDu8z9min+ohGQO4Jq8UHqf4V0TjYdnq9rj7t
N8pobJao7bPwmUn6o7ElauaE2PnTSH8M3LfWLQu+ZEfxj4HW4KbA3h/UrxCD
AJ1U1Z6hr8n/GEQUdGeVHKX9honBVY2NS0T2DuR/DBK+hh9Kt9Mn/TEQXTRR
F34gf1QxGBk1MWiTGWFOLO416vc0104m/bHYuyzIuNiM9hHEIsanaFSnvz35
H4vBpw/ffLuM4sHEYuiHhRczeqeS/lh0im1Ghib1J/2xqK+8mnR6Ie1bqlho
uJa8fGtqQvrj0Kge2HKvjuLDjQPX/Zb38Fy2/uJQp1PfXvSB/BPGwa4yMsq1
3Yb0x8FYebDF/S7lryIOSc0HLMLsKV+UcXDspy9+vZ/yTRWHe9X+v0ut1El/
PMo16nTLeFRP3Hg4Xln94+0Mdp7EY47x/fApOmz9xSP7/o6e5aW0PzDxqGiy
7ORp0/0o4uGVuYIZc4bqTRmPuraxle7/kj2qeLT6blnt6MHudxIMDbE/MNqS
5jtXgppH2gLmFJ0HCWLMvqnmtlH8hBLEJ/l5+w6i9wMjgePV1qvnj78k/RLw
NHwfBZ6i+a6U4MXjltzLcZQPKgkWNTWeax92nfpvws9+aJ6T1cP2vwREjLRa
NHML9W8kwO37zuNanjS/hQmo6ozNKUln6y8Bpkc3eJ4P/0r6E7BJ21KwqoT2
PWUCXnXVbPqzbSjpT8Ci++LZuwxpn+ckYhN3i2HsXdLHTYRA8Daj8DTt60jE
xCehzQYraP4KE5H8pLY4IYfyi0mEzaiqZ0Flk+j+E+Gyb0Mv57pZH1YmYsYq
+cW8WVQvqkSMz3uoV85n3zdJ+HuSw4IhTTRPuUlYUfhBcjZzAvmfhGcCmz2+
8XRfwiQwx6s2/7uBMJOETvOI43HLCSuSsCXaPfJYLdWDMgk6JZpq+zvIX1US
Qnab2CSVsO/LZIQyQy7qNdH+wU1GacSnNbPraN9HMq5921U0M53kwmTEj+8I
9Qgkf5lkGC/zrOffYfvfz/PK+dnKlZQfymS0zR37xtaA/FMl40H3sqkiB/b9
mYJBlYIDnu0mpD8FdxoKTmo2EEYKasOGb/Y3Hk/6UxDyatgS7VKSMyloPfbC
9/puyi9FCria2s9rAi/T/afgUO6aczyf05T/Kfh889wtrpc56ZfCbRvOe9yh
eaktRbjtobSqfJJzpehwsfIrMiRsLUXlO9fyJ76Uf5Ci5WhBKseH+hFPCtEY
3UO7F1iQvVI80L8UY51N/U0qxdpHtd9XaVmT/VLwx+h7TK4z7cP5UjS/riqx
ZPujQoq9CWb+yzUonyqkGC0OrLOZPpHiK0XKpReFzben9OF6Kcz2hzQxpyk+
KikyInaaRFcQfi2FUnDpoOAL8TkyDLe8ltVWSPmpLUOmbt7Tby5sP5Zh9rWl
f+TEU3+zlmGh1O34Mmt6P0GGYZarOekONF95MrzJWme/wpnex0IZDOIyPJaF
0/1IZeA9Lj8jMiPMyLBL/K7wYQDNq3wZ1p9waD5iSfmvkGGy9p/n06eRPRUy
eERvnT9tGbuPylDb+vu7eiPC9TIUHhskzkghrJJBX1J4WGRH+PVPe/7haf2a
z/6/QA7P4IYLlWFkj7YcA5z/+bLJlOLDlWP1H9mf7Hso/6zl+Bxa7e1exNan
HDU96a56XSTnyfGmcu7mlCUUT6Ecf/3wffi0keaJVI7Le8ee+fAfdn+TI7aq
8dFfJwnnyzHL1dFrJJ+wQo7Hl0Oa5n2m/KiQ41nBv4VdOuz9y+F2ztK7YBfh
ejnmqtaf/ryY7FPJsbFIZvhqDO0Xr3/qG3ZoyMDv3dR/U1Eftudqy+80L7RT
MT4w0emmAb0XuKlwUe0Tzkqi/cI6FSXxR8POdXY4/Q9F8XrM
    "]]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, Automatic},
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{{3.50441312615625*^9, 3.5044131370625*^9}}]
}, Closed]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"try", " ", "Parzen"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"gaussian", " ", "window"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"parzen", "[", 
     RowBox[{"N_", ",", "h1_", ",", "x_"}], "]"}], ":=", 
    RowBox[{"Module", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"n", ",", "hn"}], "}"}], ",", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"hn", "=", 
        FractionBox["h1", 
         SqrtBox["N"]]}], ";", "\[IndentingNewLine]", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{
          FractionBox["1", 
           RowBox[{"N", "*", "hn"}]], 
          RowBox[{
           UnderoverscriptBox["\[Sum]", 
            RowBox[{"i", "=", "1"}], "N"], 
           RowBox[{
            RowBox[{"(", 
             FractionBox["1", 
              SqrtBox[
               RowBox[{"2", " ", "\[Pi]"}]]], ")"}], 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{
              FractionBox[
               RowBox[{"-", "1"}], "2"], 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"x", "[", 
                    RowBox[{"[", "j", "]"}], "]"}], "-", 
                   RowBox[{"x", "[", 
                    RowBox[{"[", "i", "]"}], "]"}]}], ")"}], "/", "hn"}], 
                ")"}], "2"]}]]}]}]}], ",", 
         RowBox[{"{", 
          RowBox[{"j", ",", "1", ",", "N"}], "}"}]}], "]"}]}]}], 
     "\[IndentingNewLine]", "\[IndentingNewLine]", "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"Nn", "=", "Ns"}], ";", "\[IndentingNewLine]", 
     RowBox[{"hns", "=", 
      FractionBox["h1", 
       SqrtBox["Nn"]]}], ";", "\[IndentingNewLine]", 
     RowBox[{"d", "=", "dsame"}], ";"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fparzen", "[", 
      RowBox[{"x_", ",", "d_", ",", "N_", ",", "h1_"}], "]"}], ":=", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"N", "*", 
        FractionBox["h1", 
         SqrtBox["N"]]}]], 
      RowBox[{
       UnderoverscriptBox["\[Sum]", 
        RowBox[{"i", "=", "1"}], "N"], 
       RowBox[{
        RowBox[{"(", 
         FractionBox["1", 
          SqrtBox[
           RowBox[{"2", " ", "\[Pi]"}]]], ")"}], 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          FractionBox[
           RowBox[{"-", "1"}], "2"], 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"x", "-", 
               RowBox[{"d", "[", 
                RowBox[{"[", "i", "]"}], "]"}]}], ")"}], "/", 
             RowBox[{"(", 
              FractionBox["h1", 
               SqrtBox["N"]], ")"}]}], ")"}], "2"]}]]}]}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"conditional", " ", "probability"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fps", "[", "x_", "]"}], ":=", 
     RowBox[{"fparzen", "[", 
      RowBox[{"x", ",", "dsame", ",", "Ns", ",", 
       RowBox[{"2", "*", 
        SqrtBox["Ns"]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fpd", "[", "x_", "]"}], ":=", 
     RowBox[{"fparzen", "[", 
      RowBox[{"x", ",", "ddiff", ",", "Nd", ",", 
       RowBox[{"4", "*", 
        SqrtBox["Nd"]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.504076172421875*^9, 3.504076197890625*^9}, {
  3.50441180515625*^9, 3.504411821671875*^9}, {3.504411877921875*^9, 
  3.504411921390625*^9}, {3.504412058921875*^9, 3.504412148375*^9}, {
  3.504412216953125*^9, 3.504412266859375*^9}, {3.504412424421875*^9, 
  3.50441258725*^9}, {3.504412652109375*^9, 3.504412681078125*^9}, {
  3.504412738234375*^9, 3.5044127485*^9}, {3.504412806625*^9, 
  3.504412846578125*^9}, {3.504413681328125*^9, 3.50441368259375*^9}, {
  3.504417477609375*^9, 3.504417762890625*^9}, {3.50441805675*^9, 
  3.504418153171875*^9}, {3.504418205890625*^9, 3.504418229515625*^9}, {
  3.50441826621875*^9, 3.504418267234375*^9}, {3.504418547828125*^9, 
  3.504418549484375*^9}, {3.5044267518125*^9, 3.5044267755*^9}}],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.50441823475*^9, 3.50441823696875*^9}, 
   3.504418550640625*^9}],

Cell[BoxData["0.10226823569376085`"], "Output",
 CellChangeTimes->{3.504418237953125*^9, 3.504418298796875*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"pwsame", "=", 
   RowBox[{"parzen", "[", 
    RowBox[{"Ns", ",", 
     RowBox[{"2", "*", 
      SqrtBox["Ns"]}], ",", "dsame"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.504412854453125*^9, 3.5044128750625*^9}, {
   3.50441292275*^9, 3.504412981359375*^9}, 3.50441308890625*^9, 
   3.5044134699375*^9, {3.504413510453125*^9, 3.504413553546875*^9}, 
   3.504413584125*^9, 3.504413634375*^9, {3.504413749140625*^9, 
   3.504413764140625*^9}, 3.504413951171875*^9, 3.50441399965625*^9, {
   3.504414047875*^9, 3.5044140499375*^9}, {3.504415595234375*^9, 
   3.5044156225625*^9}, 3.50441653978125*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"pwdiff", "=", 
   RowBox[{"parzen", "[", 
    RowBox[{"Nd", ",", 
     RowBox[{"4", "*", 
      SqrtBox["Nd"]}], ",", "ddiff"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.504412854453125*^9, 3.5044128750625*^9}, {
   3.50441292275*^9, 3.504412981359375*^9}, 3.50441308890625*^9, 
   3.5044134699375*^9, {3.504413510453125*^9, 3.504413553546875*^9}, 
   3.504413584125*^9, 3.504413634375*^9, {3.504413749140625*^9, 
   3.504413764140625*^9}, 3.504413951171875*^9, 3.50441399965625*^9, {
   3.504414047875*^9, 3.5044140499375*^9}, 3.50441587403125*^9, 
   3.50441591928125*^9, 3.50441654175*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"Transpose", "[", 
    RowBox[{"{", 
     RowBox[{"dsame", ",", "pwsame"}], "}"}], "]"}], "//", "MatrixForm"}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.504413379953125*^9, 3.50441340896875*^9}, 
   3.504413539671875*^9}],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"ppws", "=", 
    RowBox[{"Labeled", "[", 
     RowBox[{
      RowBox[{"ListPlot", "[", 
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"{", 
          RowBox[{"dsame", ",", "pwsame"}], "}"}], "]"}], 
        RowBox[{"(*", 
         RowBox[{",", 
          RowBox[{"Joined", "\[Rule]", "True"}]}], "*)"}], ",", 
        RowBox[{"PlotStyle", "->", 
         RowBox[{"{", 
          RowBox[{"PointSize", "[", "0.006", "]"}], "}"}]}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"\"\<d\>\"", ",", "\"\<p(d)\>\""}], "}"}]}]}], "]"}], ",", 
      "\"\<h1=0.5*\!\(\*SqrtBox[\(Ns\)]\)\>\""}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppwd", "=", 
   RowBox[{"Labeled", "[", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{
       RowBox[{"Transpose", "[", 
        RowBox[{"{", 
         RowBox[{"ddiff", ",", "pwdiff"}], "}"}], "]"}], ",", 
       RowBox[{"PlotStyle", "->", 
        RowBox[{"{", 
         RowBox[{"PointSize", "[", "0.005", "]"}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<d\>\"", ",", "\"\<p(d)\>\""}], "}"}]}]}], "]"}], ",", 
     "\"\<h1=1*\!\(\*SqrtBox[\(Nd\)]\)\>\""}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Length", "[", "pwsame", "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.504412988515625*^9, 3.50441299496875*^9}, {
   3.504413237359375*^9, 3.504413243140625*^9}, {3.504413309359375*^9, 
   3.50441334340625*^9}, {3.504413413421875*^9, 3.504413439875*^9}, 
   3.50441357559375*^9, {3.50441377578125*^9, 3.504413813609375*^9}, {
   3.504413967359375*^9, 3.504413980703125*^9}, 3.504414042390625*^9, {
   3.504414472859375*^9, 3.50441447671875*^9}, {3.504414588125*^9, 
   3.50441459553125*^9}, {3.504414654796875*^9, 3.50441469896875*^9}, {
   3.50441490184375*^9, 3.50441490709375*^9}, {3.504414968765625*^9, 
   3.504415046734375*^9}, {3.504415086796875*^9, 3.50441514503125*^9}, 
   3.504415210859375*^9, {3.5044154731875*^9, 3.50441550175*^9}, {
   3.50441560409375*^9, 3.504415604515625*^9}, {3.504415636609375*^9, 
   3.504415637125*^9}, {3.50441574315625*^9, 3.504415769703125*^9}, {
   3.504415829*^9, 3.504415858046875*^9}, {3.50441589003125*^9, 
   3.5044159076875*^9}, 3.504416048984375*^9, 3.50441662646875*^9}],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"Plot", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Ps", "*", 
       RowBox[{"fps", "[", "x", "]"}]}], ",", 
      RowBox[{"Pd", "*", 
       RowBox[{"fpd", "[", "x", "]"}]}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"x", ",", "0", ",", "50"}], "}"}], ",", 
    RowBox[{"PlotLegend", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"\"\<psame\>\"", ",", " ", "\"\<pdiff\>\""}], "}"}]}]}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.504418169171875*^9, 3.504418216*^9}, {
  3.504418560484375*^9, 3.50441858075*^9}, {3.504426911328125*^9, 
  3.504426915890625*^9}, {3.50442754871875*^9, 3.504427563578125*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVl3c8le8bx22ioexVVnYcHPs8z32dYaRoiKzDQSQZWSFbgxAiexRK2hTS
khBSZBSib1GoVDbZfuf313m9X889rutzfa77vo+Mq99hdzYWFpab7Cws//+V
TV0rLdpZiVfdGL6j0peJHvMo7/LxTEWfv427e05loleh968reV5F8ZmuvWc3
ZaFmgv9xLs8HaHFQ0fuQURZqTe42mz/+Eh07HXtNtzALvTE8++TP8ffIz/9X
bpldNrpDEojSedCJblq7S4SdykbTg8euBt3uQgcHrKWl47NRlDjPt5lrPQg+
zmX+epSNsrMtj09e6kNT5uL3HfhyUNvlQf+fx78ilo2b1RaVOSghJ+tNhuYQ
anV4KaT2OgepeSJ77QdDyFHbXr+vPwcFcF8OD7g9jI7t09qevpGD1o2JdVPX
vqMvlfdTUsxzkWjjGerfSz9Qwj6vuf29uehZutyHZL6fqIoj0LF1LBc5ub47
pnbxJ+pRb8zm/ZeLrrPuvHDy3C+0ZLbN6ptwHtKEV62/zvxGNm20L71Wecj8
Bbfl2PFJJBIi45jfwPy+4TovPDWJorZ/vxXUmYeSpZ075EhTiKsrWI/rSx4K
cn0afKRpCo0b7TM8tJiHaGOnmqo/TCPJ/0pLY5XzkX78TtEO0RnE3xl9VUQn
H6kpvTs55jiDsEKD8GOQjwS8FAVERmfQW71IR1mbfPTt738uofOzaNZjUF8t
Kh/1piRVpxnMofVn9Wmn4/NRm4bBpluRc8i1z1AtJC0fPfS/UvGJcx5duXdC
LL84H5XtoHDM7J1HDGdnz7pb+Sjv0eRR3pR5JOLtMZ9dmY9i5803DIUXkNTg
8ohPfT4Kylo8bGW/gF7nZzl6teQjT72yspNFC+hAjB1JqiMfHQxjtSxQ+Ifa
3e9HlQ3kI5r4g+Iqr3+Ij/XelsghZn7PHOff3f+HVkNK6bxj+Uh67XHBmu4i
MnvTX7t3Kh8JFrlPCYUvoufv7LlX5/IRDxKgqb9cRApbDxW6L+Wj1a/12Sbs
S2hD3670wlo+mozx/e1kuoSUy7tpzqwF6JuMJApJWkIlH/ofTHIUoN6GN+mp
75fQYi4mpM9TgNrcQsZuCiyj7YfOluvzFaA6jt2G9UeXEUtj79XpLQXo4Y3u
S/35y8h/lofoxl+Aykxihqe+LiOvpoRrl3YUoLwfe3Q2ya+gvkBHOX/BApSS
MJgg47mCambF17YIF6A45YufDe6uoCap0VPHRArQ6TZdwuGpFRTU6NQUJFqA
vE6OnPUiriKL/JsIiRUg+ub0vrjQVTTJd2RPE5MP3kOq+c9XUWmv+wC7eAGi
Wf6NesSyhoSKaVnrzO/6k3ndb2lrSJtR87CKyWppZgojCWso6nrfWQUmS2su
hK2+W0O/WwUYR5j7CXaXtgtuX0eLHFLXcGY8PIGHZPZYr6PDbiNFo0IFaFVg
I8g4dx1dLLz8ZC8zn6mqu630/9aR0JczB04y8x2xtpc8LbOBRE9INpgz9ehf
4D6V4r6BfPbwB/9k6vU2u7qx7NYGKsE5O2j/11PfTeTl3w0Up/+YyGDq/ck7
ofq3KAtkXRrdYcRZgNq36G7ioLNAcWrGGGE9H3Xv25HTEcECT00+PUhbzkf9
FycUcgtYoOlzQ8WThXw0wnmTpv6ZBcbvverynMhH49SzPYsrLJAyw6ic/JWP
pmKdXRslWMFg5x1T8ijTH2siMbYOrBD64N1uk8F8xEaa2yoXzgr+99L1lj8y
/XSms/BvHiskhPRknOlk9tNCwrO4AVaIP/nv3XBTPlKZWFq4a8cG/Z27x63v
5COCWu/5kDA2MPe8PBlyPR/pej0UpOSyAYdtS9GJwnxEGfPS6utng4nNbHUv
UvKR3ZdBH1ZbduBGX5J0/PJRQseLEWsbDuDquZPcppiPUjbnBUqf5oAs88dD
Ujvz0RXz02y/Mzkg+uCp/WaC+ehqs7p0zEcOeBEc4CTPko9q6q463D7CCRFb
xjS5e/PQ6P3Y7vXDXBCQnaDw40weGv9Dd3kTwAXJUosnf/jmoSkVw6mMdC7I
sPrb3Oyah1bLZrYodzO5q6BZ3jwPCV5122t1iBseVvdqe4vkIUqqcf3NAzxg
01QolX83F8WYV93q9uWB3cKmKduu5qI6TrmMtUs80KykSvC+nIsMI1g8rN7x
wLpb0tTX4FykfeIZ34bZJgi4yFVTh+UiearmURsKL5Q2sXI0vslBXP8kJzh0
NsPsRvtj6d5s5K6xvEVzCz98z6yYMejPRPsH42+I7uSHR5uGYz43ZyJivBDG
osEPU8nf/eOqMxHHV4L3+4P8sJA9KTOQnolKUo63+Vzhhz+vy1caLTLR178f
LtyW2A5XXd3j+pquILu7DzbkVHZASGGnsNfTDAS2WDaf0Q5YLWNQ99zOQEoc
b9Vn9+2AWzU2l9dzM9Ciwxi9wWcH/G7xS38XloGy+KSeMyp3gNrx2B+Shhmo
xysxtFBfAMYNt12uf5GOLJTdp4VNBWHLtNp5p+7LaDkp+Nl/NoLwjIrzGr6+
jMonzp+/7iEIqedyXijUXkYcVWViWhcEISWYfV276DJ6iv8kW7wWhAdRGYO7
Tl5GCkdOpp+lCoEcy6uevTyXEUu0v/YUEoZO58ca0gfT0P3h2LWaA8JwpWPZ
Us84DTnQ0lsinYXhm3VsAMMwDdVseuTAFy0MZTLOd37KpyHvK3NnFeqEgcW7
dfXqfCr6dCvkgyNJBH6J85OHrVLRww+RwW/0RWEXy1EZQZUUVH7+mOu3vaLA
7b+NQ0wkBRXp7juwYi8Kc3pSmlSOFJSYI6q8J1IUqEvfj3B9vYTcHB99Tnsl
CjnQ8QVlXUKCIz+ptuZiYFi5K4zEdwmdnrXa8cNBHEYmb79i3ZKMvK8bbmx4
i8PVFxPT29eTkKu1zB/RKHE4EXUjhjSZhCwfT7w2vyYOllvwXV+7kpBi+MWw
+yPisKnjyqYDOUmon+3lULCPBJyvFcYjlZOQ0Q6VBxzRkvCx4+IeaftE1MFq
/6Y9VRKubrnO9dMiETGmL37PuiYJDff+OjwnJ6Jznb9ElBskgf9b9PcEZeb4
lFsxFpxSYPnO+nDZ0kXE4FM+nJUkBS51yyb5+RfROQ6lecWcnWBVKZ7U/j0B
HV9JL7xhKw3l3L+/fQ2IR37NP7QfWMhCie1f8wd+51CiPdfuNW95sNFe3vvm
Xgxyawn30PRUgJnDyVQFvzPoGEnBcsFPAQq6XUNSrM8gj8pOnWchCqBz7qUY
F+kM8szfzWkcrwBvW5K2ym86g3z93pfalilA+pPK/VLXw9AZEbnh6BEFMIu8
TxX5LxSlH29z6GAowreGA5yZDiHoFbfYoZN2SiBekOgilRyExkrVzT+5KAEc
tbD8ExSENgONauqlBK6mJnve04OQbaifjly4EtgINRZ1agShyZ+vxQYLlOCw
TcGBVx8CkVRbwDfzISVYkpYNOCQbiMKS3wWqHFeGxYNpT8fe+qMipW/eOX7K
kGubbijz2B81Nf1z5wpVhobfx8J9S/wR/5qs7bcEZfDva95FDvNHN33CSHm3
lWGQOiPbrOiPPloqcPJOKENSUpDf3oRTSHN7TNavIBVYE63+Tbjvi57y9Cm1
RKjA/eKigSdJvojCov7s+jkVMPEKfeZ6whcdmRz86nxFBQSH+o4J7vZFp9v1
lHsfqUCT3vm5f4U+6PnFyWcNMypwrCtgvDnTG5mxOQ/nn1IFh/n94Z8KvVDX
UnVgWKgq9HTXmgRFeyH76c1cR2NU4aO76i2Cixc6OfRUZUeaKlzf75m4dbcX
SqkTDkp4oArpj3v0Xe6fQB/OdHAFT6jCn75nLiEtnsh5FlOz9FaDzvgt0dKC
x9HmHSydH4LUoLHnxOvpfx7oKaEh0CFSDcQqFfwnBj2QoK/JM88UNQj+jNK8
rnug1p+W5mcr1OD8ddKOAD0PRPji7Fk7pwbU1UaZr+7u6L9Vmc1oTQ0eztR5
he53R4kSIw9ec+4BqzExP6TtjkZsPf91C++BW6Rx/aOs7iin59SFv/p7gJG9
UlZ59RhieRN7XTZyD0w8XTDTGHVD935QzW6d3wP6m6KNqjrckD0X1x+NlD3A
dv/TnGetG6qiJmpjV/fA50w7NddkN+RZl95w9NUeCCo6lZ+l64Y6H5UOJXOq
Q96SU5TkFVcU2e1+TmCrOqzTZJid5YpUphWV8oTVYYH3ROdxH1d0Tv2u301F
dTgVbKUSauqK9G9Vrb/aqw7e8viDX2su6FrRa8l/l9ThzA/lfNEgF5TvqNZn
naUOXPdJCrzHXFCWeMblqiJ1kExQylM94oKSsxhcAQ/U4WxJlP460QWFpqxM
/ulUhyKb4H/Diwx0KEqz8ZuABkwXT2gWXmSg/aScSLKkBsRy52cmRjCQ2fK6
3jV5Dbip+8zqph8D4aff3aXraEDys6grvjYMpOJ7PKvfRgOuyxcPaiowEJtT
4YmOXA3I/WxcNF7gjNYkOOT3lGhAH++SU16CM1r85PUl6bYGaFpw+d8IckYT
1vpWe59pgI4Ij/M7C2c0aNFDavqsAXjYladHOJxRL5/hP9lRDWCXNPPtnXFC
3W+uVcb+1YDIfpvvFcNOqNXYVwGta8BRW8si33onNFDEwfPfNgLsvL2lii3O
CfWv6blvFiTAsy0/vqBAJ/TR8WSDkSgBbrxcvt19zAl1indH5EkT4NYFU59/
Zk6oOevq9FFNAkjJbd6uKeSEmua7LeN1CPA6PPbt1k1O6NURrrs1BgRoakqL
xNfo6PkOHw8hCgG+W7x+d3mMjh6mGA52HybAwLOClqXndOSSv5XzqQ0B+Dxq
r68+oiP+8m/qxfYEiJPp0KHeoSPfV4lxfq4EKNwcdTM3j46kOpzu2ngQ4OZw
bFF5Oh29G9DqxbwI4FLqeHopkY5U5gaUNwcQoN99Zswpgo4+sTywmg0mgGfN
7aSAYDpK2HI2ciCMAPSPuHKzLx2NKah2lccSQCLV0U7VlY4ytTeWU88TYJQo
MWHkSEc06JEPuUiA2hsqMYk2dFRiFx5qfJkAkZwrGV/30dEhjwMlapkEkBTs
2zpqQkcsgXLvBHIJ8OW2cZgChY6ckt/u+naNABWBDHYHAzraknt175vrBPC+
9lrAQoepz43AwIpyAjgfNJoP1aQj8ZcSLVEVBPDKlWaLUKGjN28np9yrCKB0
+KbwYUU6Cu1vFLeoJcDR/WEdzvJ0pDiaTSM+JwAFm86/LkNHvdMnfSXqmfWa
vjK1axcdnV9HOWxNBDj5TALrkqQjIp9gw68WAtT9Dpp+LE5H30V+/u58S4CP
th0RPaJ0lC7/XKj2PXP8RJ6FnAgdkTXT0NUeAuB7c7vKhOhoCjt24kIfAawd
B4LpgnR01Vw/w2eQWY9drWUmAnRkeXTziyNfCcBtptbpsoOO1tyGxoy+M+dz
69Hvb6eju6eq+OV+EGC253ytKpMdIhMMeX8TQMtAZf8nfjriTXQ8Nj1BgIC7
FbE1TH6SRUjpnyHAwgnFhgYme5Zy1L5cIECLze7Ta0wWqegfLlsmwM8fnZwe
zPWan9/lS1knwNCWH/0rTA5+E6MTzKYJ+fINNnXMeOR7jzg7cmnC/jHG2F1m
vD3flC5SeZnfXXwmmpn5xE2uPlTZqgmt09SPfMJ0pLna+Xn7Dk1o1F9mCWfq
McRzg2tJSBM8xT36BMToKFUojDAkpgkKtfJ1H5l64rIW9i1SmrDdp1i8nqn3
X3WZc/dlNEHgjeTh7p10VGA0fy9ztyZIJD16w8es1/KRQtZje5jflyW3zOym
o1su/qr7NDVh+VVVSaESHdn6Gltr6WhC2iaWzb6qdFQT/7ecBdMEU66NP2eY
fgl8ih0s3K8JzqvxM9qIjqrsW9g+HdSEgelNa6ZUOlpYPlgtaK0JZ3wacmJN
mf4xOiaeTNeEyaOi/q4H6SjieeLIGV/m+pX/6b52o6MXjoLZNQGacPRAl/2U
Jx2trxbunTmtCU6jxvOGzH6JxSrvn4jWhB2hyomqYXR0oa4v1DZNE/JynoB7
Gh21OLmoXrmiCYo+JTIhWXTEszH+3/scTZjgPHeupICOEtE6xbRYE8r2m4xS
bjH1q5ffovtQE3qU4gczG+kop8G/WOCDJuDlz46MrTD713XF6kC/Jnyr+/HX
kN0JibOf50r6rAmU2sBPhbxOqJCac5JtVBNmaC+5ksWcUElTnc70vCawBDWW
/NNzQnea+do6RLSAb8yKM+a0E6pruzFz0UELOGccps0XnFCFaKd/pLMWKMCU
y5M1J1TqsTx1yk0LJtVSbshzOqMEtgOTR09qgbUGO2FKwBlZGS7+3h2uBad8
1Y4f0nRGP2+Zj77K04KfN2vLpr2Y5/O/oGPVRVog0fHXmSPAGXUYX/1eXqIF
hTKZj7eGOaNHw7PDqbeZ84f4FTbFO6MoscIv9KdasD/mY/ylEmckcHGyb+mT
FmTWXhYu7HNGXH1iR//+pwUlnj4Y3xfm/SBP6x0a1gKtziMaPiPO6Et9zoeW
X1ogSYq5xzftjMoXyV2ZS8x47wjM93Iw7yPPK22aYtpwlEzeqinJQISaur27
pbThe/mw2OpOBpLj+NUqKqMNE/FNjS9lGIjnGtayoaQN+VnpVQRFBurpG2ts
19cGx9lbIY81GcjT1ODFCVvmfPEXWRbGDPRXSex1paM2yKU9t2s3ZaAA3qV3
SwxtIGtTMqjmDBTeXvv54glt0H2URBE4wEApVvqrt85ow/lEjiLcloEEdEQ5
ZqK0QWpqWdLfnoFyhBf5DM9qQ5b9bFeuIwOVfHos0ZakDf+qXFraGQxU7axn
NF6gDSHn7RxfejKQIVmEqlWsDV/GeThKvRioTvaf+Zkb2tCee6g+wpuBWkdr
7Hnva8NtNOKz4xQDfT6pe0blJTPfNYmg5tMM5GIhHBfQqA3Gct1X7EMZaEx9
4eLTFm2YudL4aiSMgSanq3PNO7Vh/tJByiDzvmcL1XniNawN3/yOrxyMY6B4
O6FXD0e1QZgsk5t5loE2G823Lv/Shoifvy06zzGQ0HpVf+KMNtRYFXEpxTNQ
3tcrQ90L2rDv8so24wQG2vkq6Kf4ijZ8SDxgZMt8XyidIy7eZifCSGATh0sS
A91zF2SZ5SaCrParWzbJDKRlOsdttJkIl1KOR1EuMZARb5XIW0Ei6LCvvV5N
YaD63xm7BMSIsMXmG7xNZSBae6CigxQRtlvaraSmMZBlmrbe791EWC8Uh9XL
zPr6CyBtFSIorKr3lKYzkK3VrEm4OhF+rRx7TM5g6kXssWzUIsKAk9X0Rya7
CD+y4dMjAsWi+DzjClOvf+lOVkZE0A7hCBtmstenAI98RITPZNRpm8nU7+lh
3+9UIqSw7EprZnJQgdZpVTMiHDA880Ili4GWIndEBe4ngsGKOv08k6OcZ84/
O0gETy2ZoF4ms5O7L7FbE0FS0oB7ZzYDJcg+zNxnRwS+WhcJRyZv4UgvzKAT
wWF/fHUak9NH/W8MuhDh6VzmwDMmC7ccuifnQYRpLDT1Pybnl2tWn/QiwlC7
0Kd5Jjd/cmu96ksErSOeyRw5DDTDmzXYE0CEaqM3RF4m7yS1TnCHEIE/t72X
i8nmPsuspHAiBO9nD1lmzj9dpCZ0KpoItI1JsVEml7x3Urp+lgijavxNzUzu
YLls1B9PBA3d3rCrTF7WbLTcnEwEzphbyI/JCm7zLpBGBFQwKqbL5MNXFIOD
rhAhLvLT5rn/6/HaLqE8hwh3qpslbzH51kJS/ucCIkTVDVlYM/mDYt19/mIi
8Fjsv77I1JfFbuoV7QYRRB7slM9gsu2zIz/v3iPCx5zVB/eY9Tn358LKUCUR
klOHGvcwuULqyVahGiLIGAzy32DWlydGSieyjgg1H9jcw5h+IFYeMKtsIILv
hdDAXqZfGN9iHUabicCozXyjwuTHtLFYi/fMegqdt3/C9Nu3YNHM2B4iZCpz
Fswy/bj1pnl5dR8RTigkaO1mssemBx1SQ0QYTBQ66cv0s3BHiMTEFBGyblvQ
c5n9QNm4pS47T4S63IC8FGa/+BI+k22WmHpxn6OGX2Cg1+ngWceqA3LNjt8N
mf0VdHRTdcoOHXjkIJBvFc1A1xKMWhuEdeD4DvswjigGevfEZ3BBXAfWxE58
vMvsX3nJblZnOR24quS89f/93TOUZ6lB1AFOT9WqP4EMtL693cVNXwd2KD+r
tAtgvt+pG0HZJB0YzaAa1jHPj7gbbvkbNB34SsyZ9vFh9qOX2s/31jqwuylc
wtODgdJmX8SeCtGBaw0a5Fbm+9+nO83FMVwHzgsqve0+wvRPpRvZLFoHfkab
cvUeZiBOv02s0vE6ENTy73KzJQOdGT8S8z5LB7i9v/AdNGEg9+HfUeo1OpC1
eOcbB5GpT32dk/hTHfBSr6/MY57H0lcv41x1OmD7S09fWYOBBhz11v97rQNV
L0u9CSoMdLA/LvLSRx3ole+K+LGLeV6+F4v4M6cDsTWMpMVNDCR6/49D/6IO
6FjbrYhxM9B88kujplUdENIfVCIy748Kc/eVfA5d+L13NeLGqjPa3VxxZp+g
LmRKLzX7M+8f/hemYbe1daFxZy/FqtIZjd4OPu0ZoAvm2ak+xuCMjkitfyk/
rQvcsykHRPSdUVPqBdNfZ3QhN+e6W7+GMyoJyhb1OqsLWed5CUq7nBEDf/L0
5BVdcIh5/nJ91Ql97lpd963RhW6rit1J1U7ow+LZ+OBlXahICD6JxJ0Q7eTm
qep1Xbi0kXx+Y5sTevTfFdsFNj0oNlCgP+B0QukNN5RD+PTAbI+B7ZcpOjqY
3PI2VFIPkjM/cJxpZv5/2MXHH4HrAbfAOP0u833TaJKeExenB/dbWLklHzmi
EY9n7Wcu6EGRRfv2ezcdEUf8CFtgoh5gWz3dCQWOyKRF18ctXQ9YjJ5NbTnv
iNpMB8m0Ej3YtS7XJ2/jiLrN5H9zNuhBxxavrMZ5B/TNvAa7yKoPCZ033rWr
OCCWAwPfUmP0wX8uMkrQ2w611lnLBZ3TB9v+xuV4uh1KU+9ys03Qh8CPfbQJ
SzskvbV1RDpNHx4Kt5AyNO0QtFePVV7VB0xKKQtfsEUx+y6P99Tpw/k8zd9i
kbaIxcxsRmRNH9KCgi2+xhxFG1DDei3MAPh+/33C42KN4kX+WXTHG4KRtcqZ
OqWDyM/ereHfWSOwbEtMKlo1Rpuvjg+REowgka2UtK3LGN3+7r8Rm2wEZP/Q
O1k3jNGYdwxpc6YRzDcbK/+xNEZO0YU10mVGYFD2ya6hhIb2X++7vbfVCN5J
3de4eoCKlCb2ZeRvJsEj6ZvOmxsANWv1VA7xk+BgbOnaqTxAx0LsO3cLkSCg
m51jPQDQVZYTWyqkSDB+9b1mhjwgYYEL8U3qJHh710HJVwAhDv368L8HSbCn
Nb48tZaEhmKJx1AmCfhuzCpeMddHu4W3ppzKJUFaVtz+/Tz6yOv2j8fFhSQI
W6sJOtGsh2a78/g4ykjA23mx9gNVD3HJsz5qrSGBWutYVjhVF+1pbmc93E8C
LX5IcbUhogD7m6pnP5OgmYY5FIgTUc1EjHXVEAnyN2REyF+1EYgQbwn/IkH0
j6hD705ooyOeeQcHl0jAvq28evKsFjrDe/zqMQkMCsqMBS69I6CXRfAmcxcG
/B/ffUzMJiAObfHZZjkMtvOcuTvvSkCXHNpNlNUwENl9DN+9oIGu3dWe+EvC
4OSmCPluhjpqtmTBQpwwCN8RozjtpIoEMnIHLhZjsO2DWvb0ym7E+1GgK+AG
BuLsVeGbHu5GLCIpLQ63mOs/N+v+4Lkb/cmLq9pTiUGL8Jzb2X551FxyMqWr
HoPru3X2qNfLodCHGEVsCAO/DA/GrgoZ5Dv3WJ9tBAPu4Ni7Uv4y6Jiulsbv
HxjcLOPd1qQlgw49VZB8MYlBM9bfxVkrjVQati0wNjCQsW8vSLqyi9nPw7fK
d+KQ78R9b0xMEnULOF67LItDXZO+qEiFBGq17s06o4BDgZw4JdxUAlV/aju7
Xx2HU6sNu/rCxFHK8CP6FIZDV+ol17I/ogimz2/Xp+OwmpfBMsIjjHS1WXhk
XHCo4k2cdq0UQmrBZ9Y3ueNAPLsaNW8vhMSWfH8PeuMw0DwjaFEpiGZYbF9H
R+Bw6PAKPclLAN3gVwlrycch4Swfu9eW7Uh9zG6R4xoOz5Tk3qnW86OaZxdD
KNdxkKuYydsUxI+aPX4Fv7iLw5785JeSddvQz+flAY9e4NDE0XB06OwWdCq9
f3rqFQ67L7zMSFrejJaO8/irN+Nwgo9gQg3cjHgFPP1udeDw7foV5wYvPqR2
QtH76lccWgXbVTz9N6Eq/Ojvz99xqFzZ/eHrPx6ECcZ7if/EYeHIta/6MTzI
8uWYZ+YUDjolGR/CsriRn1CZexIrguL/tmmV9nOih6/knUPkECycF9fgeMCG
DLOPfKlSRGB2b+Wq1CE21Oh9jj6jisDjqnb56zlW9EFkxMGHiAAidpbeA1a0
4FNq62bMlPlgcOXNDxt4FLWn79peBLpFFz5UEDZwbjH2o18sELTQxg0upq7j
ok2u1nY2CBjm71djrddwA3HZwweOI9i2VdouhXUFb5g81JV8EsGfJ2FCmwOX
cfPXsQfb/BAEn05T2fZjCbc/NWxpHIqge/zDw9jeRTyi+do+o4sInMcaQmS7
F/D6gF3GincQDAg+gGHiLL48P5km+QABi2l/992uGZwYVv95+yME+4ccVXRP
zeDl0S5Bq08RWHmWT3k+nMbTkktLu9oQKPb/SSw2n8LbtgVNNncgeOZaLuvw
axLnyKAZPe9GUPXHZTAZJvHQ3NHusgEE+ufTsrcu/sWdyxTZIsYRKCnerjJP
/I3nKC9a+E8gmP1t9mZifhzvvtua6zGDQKNLSvrwsXHc5NEJzUPLCCQzX2Sq
7v2FiwxZEwQ4ASo8Du1m1/qBb/zJdv4pCCD4bybYP+Q7XqAew/ldGMCTzPWe
xPsd1z/leec/UQCBm7SnSle/4QGz+v+6JQGmvHcn4++H8bGlTykv5AF2TZ2S
9jUdws8aNRBrFQCWFE9fSv/wFZeOvD3wUAnAev/0E5adX3F7lnCFcjUAtW2G
ck3P/sM7uCTr0okAVe6+bBoyg/hJM45jl3QBoiQi8sfjBnCexD+bmNcP4NI1
Dt9+fMIpW15YR5IAki/pW+9/1o/XCDj9PU4DMD3zzz76Qi9eJH1NEjsCcM5Z
8si9km58a6Jm6x4bgBnj1D9L2t149GxD4E5bgJ77V8VzW7pwRvNo24YDwHob
25fS+U5c1ls1rMENYPc3z/mEvg48/eNz+UfuAKlCmQqrkh04O7LsLD0OQMzd
aenn0Y6PbPdXPH8SoH9/1VMeznd42eOaj6aBAJ+F2iU2fN/gwjJmsfrBAA/U
hGY8ulvx+MRPasohAOP3G1+RDFpxT/rqWd5wAK35tTsT/C24CjtFqz0O4OKa
oX3xWBOe593z34tzzPj8cmvuujXhfL3HLt6/ALCFlavqxvdG/E95/FBqInM/
sZJ9u/804Pct21MOpwOcTb337I3UK3xnrZMh9QrA041uhQcV9XiqzNSodhZA
+0u2ye0m9fipuR2YUB7AdHFQm95UHa6VZ/u7rxiAVH9somXyGV7CPp7VWgrA
4G0PvW34DBfwCac8uQHwo1LzYNPFp/gcKsrNu8Xk/2rVacQneM3od1N6JUC5
F99v4doaXOFA8KzFI4DKuzV6VrI1eHYt11W8mrm//IMUqbRqPDRJeWHXE2b9
W74Pbz1dhRtq+l3/Vg8gOu5banfiIX47j+VgTwOTRdI1l/5W4hIc6SuNTQBb
D3iOXQmuxFd7qw7faGWyyif1qEsV+IuIZRbPTgAwVwl78PwevvBgbCquG6Bo
remzyvBdnPC9e6jwA4DV7RSlc3x38et779T39DN51ckZ+d/GE4UdY9AwgLTv
BRe+yJt4016zU/bfAejKoZGl78rwtQgiI3iUWa/r9GZemTL81PfNcOcXwLBc
HH9733XcpuLFhvAMwNub535MhZXgad9vTWrOAfwMujXe/qcYfyOc9XX/AgAX
66nD2W7FOCnS92XcMoBYhGzRRcdruKz5rugJNjL0tOKkhJkC3DGSz28TJxms
O1UEKrYX4JkV/5zkuckw3K/9UVcvH+cR6cTt+cjg03FVr/ZKLj75PWb9tQAZ
yrH1QtnMLFxJxGdiSIgMcnu7Grq/ZeKu5nZfVkTIsCv3wONynUy8t0KzTlOS
DPvmVtINxzNw/hGp+/t3kkHraFPXw30Z+F4R3qLj0mR4xZt74U1lOv488ltk
oTwZjiyVvLdKuowvVHT41CqQofSU0JbE9TRcY+QpvUeJDC/N3vKOBKfhJeYZ
2KY9ZPj0INpZZjgFTxChrQXpkMFLdL2xZHcS3mBO+JuqR4YQnzFfc7NEfCVS
8r/bBmQIcmYPS/e/iPuOzD0fwsjwtjfRxawvHi8XGb67gsjQXkBLcRCIx4fN
2wuEKWS44eN9y876An6k8kbEfhMyuB4lPPQZP4enjFz2Pm5Ghkfd2z5qYufw
FpEoxzhzMpimBtKwzLO4YZQNqdaSDAc2f2q9fCQOl9nHvSp3lAy825/NYptj
cOJHare4HRnwdbCxlozGTZxjyrc7MPP/L/NeuGIU7hW4dGTDibm/VXbg2OEI
PGJNR3WBQYb/FkduvQkIx1PjA1j/upJhdBubuV7uGbwq//e9AQ8ydCpHuawu
huLNu5XOdXky8/vqtbyiGYr3Pzhm3+pFhv2m+7R7T4Xga43/cdX4Mtfnbqk8
vRGMm/x573z5NBkU9l7TUXAMxG1Pb9ZNCCVD4kOrs5UvA3Avlr2bo8+QQcLW
u+iXYgCeKthQ6x1FBlG9Sv5BTn+8pGg9xS2GDOcruf5ZhZ/Cq5SM3O3jyMBn
Wxk5/csP7ydVbTe7QAaN21NKBT998PHmqR94Ahkev+ezuDjrja8e3FOnk0iG
IWtjrTFOb1zGvcxLLoUM/cI7H4mAF+51KadxPZMMOvbT/xo4juMRIh9z57PJ
0Kp5X+CSsQeeUrz91J9c5vzrCQSjZHf8UXWi5EAhGarUvtdnqhzDm1HLTOdV
Mozf/mU6EeuG979hf9NSTIaskcifcV9c8dX/IoKrb5DB5odST1OZC77V88m+
uzfJsPnpnQmFHS64zMy8TOktMkjv0XqiHsfATbj8OtLukcHMy2+H2VcnPFXd
RdG7mgw0Hu4BoSV7vKS2cM31MRnKpHnTpnfY41WUgR67J2T421P6Tpxoh/fb
WMWYviDDhWJui5Cko/j4UKoN/pIMhf1dquiVDb7m9U5N5xUZvE06HkauWeOy
0cafZF+TwWlRWykn4QhO3BT3QKyFuf9I9n7BPivcJKPuPP8bMmwKTwswVbXC
T97U01p/R4Z3l0XeyIwcwqveKyd9+kAGwfv+mioKB/A0uVc3lnvJwPHuiWff
ugV+MsS2XuIT8zx4yVU2P7wfl90VP0//jwyqqkcrZZrN8bWAnfzRX8lwu2q+
6lzzXry/uVrl2jAZ5v66sbB3muGpviPO30bJkH3/ToPomgnu1RB+hv0nGcIl
9XeIS5vgJsICmfLjZMidfK3Du88YX31BbvOYIAPmPX3o+mMq7rXlKvH3ArOf
E2umq0cAN3HRPbB5iQwey1uSBJjXtEx1+4k9K2RwrtXLHqYgvN9xtchvgwwO
k7Km98dJ+KOKjCdprBTosyr8O99hhKdwqH6oZKeA3j3fgpsvDHHju3ab5rgp
cLJ7Pr2vVh+XZpmWE+KlwC5JYsX1Jj181SoB191MARsRlUNhn3Txhys1gaH8
FDj75I3agqQOLr1P8MuqKAWOcKQ3rrJp4atFdxalJChgmKzlVmGpiffNUASQ
FAVKfPriFYsJeEqev1msDAWsKIn6Hx+q4ycmeNxK5CjQ2hJWGRu5B6dRrkU2
7qbAVuFpuS9WavjKr46HnCoUiNbz/bcso4L3Yh7tCmoUkLopHDQhqow/vLz2
w1SdAk8ufxv9J6aEexqoSSVqUWAx/WJQv74C3ptwMX6rEQVS1S4aHx6SxR9+
li7RwCjQGex+wnmnLH6JUPv8IKJAboJKzk83GZzWPzadTqWAccRIiQ2HNL5L
LWpzlTEFJg+gVq8XO/HlaCHFj6YUiGpYK+GOlsIrFWmOIvsp0L8s4rGkIIEn
hw+e1rekwLq5DrvHZnHc833AZbuDFHgooS82vCqK7wwpbs4/QoHrL3PknNaE
8eTmdYI0nQJHP9c01vsL4OA/pinlTIHR00pkuYc78DmJDi1xFwr8buV+e21p
O+7oX0gUdKdAl8upkD8F/Di/5Hmd7ccp0HR6Iyx6ahve1Oytu/UEBeKOqrmd
erQV3yNJ0ufxoQBv5PeEAMfN+LdmOQNOPwrUDPUN3SPz4Vn+fIZs/hQQmp9J
idfkxdebB4xWgyhwc1Tk0GUNHrzDPwxNRVDgHb/PlGA+Bx4n6QJ/oyiwyvvP
F96y47otZuTxGAoMHJF6d5idHS+SFKWOnKPAy4nSbdyJrPjhlg3q8AUKyEWI
vZXsZ8G5An7QviQw43XWHGHZw4L7tdSY9Ccz/TlzTNn7wxomH1Bk+jGFAt7J
YXSJ66tYv+QFs+40CtBD6Hyx0SsYBFibv7tCgbwdrrcfH13C+KXmLOoLKMDv
Of2pMG4ea2oZtHxRRAFX99WQB9fnsNCAxgNPr1FAQn7aw+P9LDbUkn6o6joF
Dja9FQjHZrArAWcOV5ZR4PSuPQVGMdOYmZSr1f1yCmjGTfd6tE1hlQGa1uV3
KbBdVjyg4ccE5iElZnPjPgValCddD934i4m3shwtqaCAqXxeSZbfHyxOqtO2
oIoCn79pjdkpjWOHW30d055TYOetKOODO8cwrkAb+qU6ph8Msz6uEkexp1K4
U2I9s79UGdqLR0Yw2cAtjHNNFAio3/XL78E3rFdqnhHbTIGPrkMj+K9hLLH1
s0tUKwVS8q49YVUdxmak7rqFvqMA3xuN+SOJX7Gy1oxjwR0UYL8c1rVg8AWz
Dwx3D+ikgEmj1brqv89YQ6v5ce8PFHjGe75AL2cAywj85cX4zMz3XqCXwfFe
TNzkjL/VFwq0NW97Z3vmI1YiyhdqMsQ8H0rukOeyPmAPX6idVxuhwDauWSHV
392YYdqLpF1jFCjWlPktKNuNvXK1TN/xkwIufmFxIi5dWCf3qauLvylAHSgL
s/zzHrMdYCn7/ZcCmOrFv3rZHdjQ3ct3v0xS4FwC/4epA+3Y5KFHT5pmKaCs
aut+92cbtrVgoSdthZnv5HTtsVvNWJZv/MDZNQps4u7ue171GpMiiw6f3mD6
TfH4rGhbE6Y2ZjDhyE6F7CcBRebbG7Gq2ra5A5xU+FzuG8mgNGCkJIcVCjcV
TtuHVyyHv8L2ESJ5lPmo8Neo+L0bdz3WzbZ1m+QWKriZad2RqqzD7D8WCW3b
RgWKTaz5H5cXmNeZetn5HVTgiR5YKPvzFEtoYsdeiTPH337N+zC7BuPPvkKt
kqTCw/jZildF1Vj2id3mN3dS4UUL1cKoogor22p69JIsFdIGWon1Uw8x9eE+
eow8FUKE/T5s7HyI1TzyPBaoQIWTf9satttUYq9tE/3tVP4f39Hk6KcPsP2q
EqH71aggKTbV5Wh3H/uwdicKqVMB9ka7KHHfw0ZK2pN2a1HBVmXxrNSl2xjb
X/6yaQMqXGnYxfpRqwxLfFl8d8SICj2073L7DG5g29O1HvVhVLDeOfbey/w6
Jq13pP4FmQpZMb9CxhJLsPJNo80VVCpEZMdH+jwpxgifg9tLjakQyWLQMjt1
DUOx2QMX91IhuG30MvtsEdZspTQcsY8KLCmcz29lFGKWCk9++FlQwbki0Tyc
WoA5vR2Ysz5EBas01CjRkYuNFZ5cMbOiQrjEnuTamzmYz6lVVpI1FWSod+ck
UrKxCKGd22TtqHBpvKdIMDoTa6/cZI8cqCDuOxllGnQF22k5f92RzqzvOs8J
wdMZ2MsL7wyzXajwpZ8tXKvwMsYvV3u+yo0KHS/LRn1fpWGMl6WdXe5UaGEj
l+oOpWJsi2c8NntRofRdP7H2YzJ2+IpHpbI3FdJPZLMLeidhpYTDqya+VDBU
Jm2rFkjEaCeU02MDqHBk1qgwLyMey+QU+q8oiAqqv/c9d/a6gI0Vsyg9P02F
4xsn4r0OnMfiB/peLJxh1vuT9Jb75LNY/+lGHsFIKpRtfQPlFnGYksADK81o
KkQRnTy93GOxtn0Xfp08SwVdwnVLNe9oTPynP/HieSoUHWT7MDEYiZ08R48u
i2f6r9iwc6dzBLb5BVFoOIkKFl9OvNldEIbR7aQZ65eo4NrBm2FyJBS7P893
RyKNCkLBsRHHJUOwA+rfweYKFc79kZm++SkIu9bWkRSYRQVPanaFY3sgNuXx
tDcthwoqmX/VjToCsPSrl73fFlBh06vm4sW5U9h3o8jHP4uocAf/c/mO2CmM
2O/JxlXM9PeDvp3O6b7YR37IgRtUeH/ZlN/g0klM4Z7qd/pNKoycOeAhoeiF
nd4roh5+iwrXTvSFv+z2xETjJhqr71FBrvS4008HD+zEzoGtPQ+oIDJpSvmg
5449ffrabqqSWZ9MP8UDsscwh9mCSZUaZv1n6xd2S7tid1MTDM1qmf22xegH
QcsFW1UNOu/+lKmHf4u00kEGVnRsn8S1Oioc5BB6LuFAxyZZ9Dxe1FMhI/MR
R0efAwaFspUDDUz/hLaJsXnaY8Mfl0yEWph+9er/vPvlUUwrYPSy1hsqkN97
B1ics8HitnZ9PvCWCnHqt9Pd7awxedPygMT3VMCVe+vMCVZY0PeMFze7qEBq
ZMeKCYex19HRPK97qCCo6GK6jB3CPGptijb6mPUY4j+7f9kSe3yE8ktygAp/
Fu6NJzlYYDzTe4iGn6nQP/mVla17H3ZLmbMtaIgKn9jE812XzbBuSfKKzzcq
dGnWcWjXm2Kr2yLVjo9Q4b5mxU/JTBPMcmEuxe4n02+RG/V+J2hY6C9C/eFx
KtzU1j5+4TgVK/7sPb3vDxWkqty0tgdQsLmGESt8igoFtWw3CLcB21kjfV5v
hgrDMZYrdvcQZnrLsYYwRwX7HUHn+8VxLC/1g6jcIhXamrQSUzSMsKY4fnPJ
ZSp47e5dnv9ggP0N3h8utEqFWQbXHkqSPgaOTf9xs9BgKlHYy15RF/M6wLKN
lY0GfT/t68r4dLAMCgmW2WlQXSqV0remjY0pVZX84aZBukjaDeNNWhi/5FTP
6CYaFDD454xlNDGDbWqcX/loMBxeIFxBI2DJ86XHu7bRIHNGMU/t6B6s5ufX
nLbtNLjoX5Er9lkV+zoo0dYoQAP8bV5DQ6AKptWQoVYjQmPe/0N7q/sUMcfq
9/QHYjSgPzvseKBEATtfzpdaLkEDoaxsDpOI3Vh/ytnpvF002LH8Wd/GQQ5j
i3spe0WGBuLFXqmbnWUx1eAVq0tyNBjkd0C2fjJYlENgTbQiDbAKj45zHruw
cssHP0KVaeDA0YiFvZXCusi/RQNUadCYdoGNy1gSk1dyCz+mQQMZLq7ZcX8x
zFLi6l26Jg0edL9/6ConioVsHfzPRpsGJJE7HRWjwljb3GHYq0eD0BrJjYRc
QWz2R4o/xYAGXwisuQkXBTDJwbYSIyMaeG3yumUWvwPze0XhVEc02KzKuGl3
ix/LqYrSVSTTIE/Jda09ZxvWcPPpcWkqDSyF1irt5rdggilabTtMaeAepM1w
+MuL4bG+K3x7aZDICuwvL2zCjgfdVuPcR4OfpAvVPlo82FN72dR/ljQYu/5s
bNsLTmzEwql+6iANevozSIfyOLAt5LzpX4dpQCz6gIdeYMcYijuOfLahQSzb
Vv6zCaxYorjl+Y+2NHj7ndjOXsiCPdqSWNNhTwODHS/cTMI3SFxzrGKvnGhg
H1jUdZO8SlqsyEkZYdDAdrHFLunGMum3jwYHjxsNjILqd4ZKL5E6fzhOWh6n
wQFCfFSAzQKp4frssYATNNC2FNuyZ9s8qdolcSDzJA2i91qvmA3MkvIGH7/+
7EcDecaztrLSaVK09WiFXBANBK2tc/bYTJKOvd9R4BVKA045UeVPPb9Je/dC
fGUEDWr2qKY4V/0kqTf6BCzGMOO5Essu8HeUJIDl09F5Zn0Xow8fD/pOWqxp
NbtwkQZlz9LbesjDpP8IC9rtl2gQtmtf4qn8L6SG23K7BNNpsPi06f1F2UHS
TflDvA5ZNFBkEXrZurmflFwUNV+cxxxvP11+8MBHkr/o3aGfRTSIGRx76TfU
TbJJ//RWo5TGPI/XCqMfd5KkLxBLXtyhwV7fx+ijVhtpPCw1dF8VDTpI1EsV
sU2kz7oKE741NPj8dfbwhlkj6f3sc7f0WmY9LezNC2QbSFU+45afntNgWiz9
Yh5PPSnKxXj38dc0iNj3RCOO7wnp1M7PeYktNOBOL3tvnviY5DYYwH//DVPf
nPbUD7tqSGbW11bm2pl++FTWuXDxEWnH3pWuuF4aXOl4/5g16D7pJqEyqugH
DdjcLduHfUtIvkLTS49/Mdf7j96UblVMIi4Tgrt+02DPZX2lDbNrpPrGipMc
UzS40FV9/WRTAanfpsLWa5EGOa8etQR5Z5F4Ih9o6W4yhh8yxKMpykkkzzf3
xtpVjOGJdY5v191AkrLrbcs1H2NY6lkwtSuikgb3Pnlo/dsYxE10x9VjR426
S8/sQYEmYDC2vepOZpjR4qNDJNkZE/hi+TjSUJbfaKM2oPqCryn8nf6jV5tZ
bLiPYGIcMW8K4NEa5lcgZ9hC1zhxMtAMTjm2yUWcKzfY4eb5rDDYDDZppe38
tq/MwMmzeEtniBmwllQnnTC5brAQIPCQGGEGtzTsctkbrxnIJ/xbXjtnBh03
h/44jGQZxDx8mZyWZQZBJ/AsfZPzBobcByuqn5iBTa5B9JyUq8GFzRfZfj4z
gw+hzy7/8mMYdG1vOCJeZwYfNYJ6/nbTDTwliUtRDWbwclTujGeirUG2pijF
7K0Z3Cb11i3lHjSYcxjqGfhsBt+tXvAHmuEG4CKmsOWrGbjoklYY/kYGSR6H
Q9GwGcR+sOzg/qJvIOvfJHl91AzGQp2OcHoRDQ5dKHf3mTCD1nONn7IiVQ0K
koYfX50yA4WO2Zfdo0oGP9PEebtnzCDTyFcIS1YwiMlPvq/7zwxqWB8psEXK
Gry79prlxJIZ/H1S+c32hbSBSNn64fwVMxA0kdWLOLDTwPWO3o32NTMgjZ9O
SzwlYXC/4tS/jQ0zcCQdHn7RK2rwPz63TA8=
        "]]}, 
      {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData["
1:eJwVl3k8lG8XxiVFUYRkN9bwE9lnLJ3DjCgSJYmUmrHvhOz7KEmSStYZKUsK
hYoWSyGFFpUsoQVJloosLe/z/jPz+X7m3M997nOucz33yB713+PKycHBYUt8
/P9b7syfywXS1duKJlQP195iwm0eFRlfjzNQJS4gONbFhKbjN4qVPQrh4ZUD
4soTTGjdGui+2qMSzGXy+9+SUqA97aXFnPtDkP2VNfE1PQWeGCTenXTvBh/1
4z9f+Z6AjrP9gePuQ5DgfCCBRy8Vdt7nth51n4bN9zodWROnoXOd3houZw7U
E+GTF1I/B6ZnzBpLdvOgfMbKzlq5i+CqsbROc50A3s96xnnuYQ5Y9adcEZUW
wK/qLlSrrhzQSdlozKEhgOmKPNPLAznANbTVp9tGAClxxdRtSzlQlO7e4Zsl
gJYmLby7dHJh6FsPs1xiA759M1ObdDUXDlRU/pNXFcQQ9f3ZUwl5gA7GF3kN
BdF7rk3VPiMPlLmeqv+wFEQemb/km/l5sOA06tzsK4g+ZfVnze/kwQVeqXsu
1YJYpBBy9/NkHrzySj2eTxZCz740xqe9+bBLxXVWxFwYfaRz57JEC2DpVEjD
oL0wblvft7ZMvgBKp5KTi92E0Uu5s61avQC4aq6KaTGF0Wit7yY2rQDqt42b
7HosjDLaqcrz/gWgZOedmUjdiE9zGzWCHxUAR2yg9gyIoKx1khCTUQg3RuL/
1O0WQcah6kSSXyE40TLbog+LoPfdO3duhBVC3ZpbTryxIshF93C8mloIPlk/
E5UeiGAHp/bwiqpCeFcW1nPQaBMKbdeyd10ohJs90SFPyKL4m/E8/D2woDSZ
cfTDDlH03zOzgkJjQYGe5e5lR1Es+eW4Ks2CBanZoipbokUxyigrRMKWBfSD
twYymkSx/kR/89ARFgh/Gqc67BRDrs/iQb/jWbD2fPfWQCcxtG3QfjKYzAKO
7XVSqT5iWL6PN/b2SRZMliT+akgXw+5UtxV2Z1nw2Fv6mswrMXS6Y2KkyWJB
6I+9gmNO4thnevhk5D0W+BQb/PvnI46Pd3YZfnjIgqP7ZCdFY8RRNDHD0KSF
Bda3px7vZInjjRIx0vgTFmyOPBl+45M4WoSUeb17w4JezofDIb4S2NY+eGbH
NAu6bl3pTI+RwP0Szi91vrPgESOtvuSMBG5WuOAoOseC6tYDWe+qJfCfabJh
+xJx/tSf5sbzEti1w97o6So2GAqqVnLFSqKd4KzhIXE2dK1wfNJ5RhKvSDif
aJZkg8vsyY8XWJI4fffFURkZNiQ9/7JJpVkSlZP/NjfLE/HpZXG7VkkhmzpL
qVIj4mPe5YiISGFO6N9/veps+O67pnZISQqP9fPuX9rKhk27PL8EWkihyrhI
vZIuEc+rsufCKSmsPvzwqJIxEb/k4HM4Twq/u4c8FAJiv4kTTOXrUjgxU1C9
iGwoezJeX98lhV1+Uw6VNCI+pVR+aIM0driub2uyJOK5lOc2Z0sj/wJXV6ID
G0R+7uefLZVGJYvt/UsH2FD6MUWl/q406oo2pHo5saGzeczZql8a3b3W9Wgf
IuLjS1oDpGWQe7HvPz86ER/wdpiiIYMWVSS3cgZRLxfuZU6UQY3c/J1DrkT+
4K5x/ogM7tuQIqLtQeT3Ryn7brEM1qZ96k3wYYPRN/ubCbUySBo7n5jkS9Rr
gPnMslUGB075jMT4Efk3jHK8H5NB61BocA5gQ/I1EYmSBRnU3V9AMQ1kQ9qu
y+J3uEiYmDvmLxPEBmnjVzrxG0los1NmzaNgNozpfG36LEVC/sEUv1PH2FCl
tnL3TiUS9nF3Z1iGsMFUUttTSJ+E1S94N9SFsoFX2HI+DEho5XE20CWMDT28
9MQBcxImeW/MWnmcDe7LmflXHEhocsdOQSecDVnWky3hLiR0TVLadYfgRrbZ
xC4PEp4zst2iF8EGUYsFvfkwEpIk+UVlItlAy7V17ogloT79tUIqwQFT5YkF
KSTUfOz4bYrg9izn59svkrDfXKLuShQbfo7VzYsXkvBs9oU7vwgmGQpITV8l
4Qs720hqNBus0j2pLTdIuOjl/+8EwcdHmj0v1pFwmCayvZ3gYh3JDO8HJPRt
9LFZEcOG5ykhddBKwgvKuTI6BP/u6xoQ6iLhevWnNS4Eq6grrxx/TcLi4c0b
Ugi2j49XuTdIQp/SQd0SghN6+nZnfCbhahBXaCL4xmadUMY3Em4t4xvsIbgv
4nQeeY6EHls/H/lA8Oqu0Wa+PyR8ffD1rS8Ea8nil2EuWVyc4u+ZIPjQsUv8
tXyyOPuuveUzwalt33VPCstitrFuUh/BdeJWB50lZfGFyymRJwR/8L2SoKkg
i7IVnFHVBK9v+lu6Sk0WTYtf1Z4j2EDYofudtix+/KT/2J9gN/fqueuGsnha
wuuaGcGZ9WslE6iyWM151XMjwQ/WMUztLWWRz1l5xRBRr68u9z1U98rihRn1
4CKCRWtEzvx1lMW4hIXGwwTTuANqXx6VRZOXj76KEBzg+KT/qpcsDp7v+dlG
9CfvuhxnZBCxPsRzMIjgdo4o5d0RsjjB3Xp10//7ufe1tXwCwZ1b9tQR/bZa
Ssl9elYWuY5r2o0Qejm+a6Sp8JIsVrx0uO5LcDHLYDyYLYvnzIu+/SD09Xv7
Nx3JalksHmxQniL0qJyz3WnmjixOUaWVjhJs960w/lGjLPLsaON/Tuj3+rk9
XT7PZVG8Uvz6JULffaPXfmKvLDY9c6bPEfpfbbBKYuOwLIb/FeX9/zwcGr7t
fn9aFofLNXU+EfOzfovUivX8cliscn1DFzF/BnGhmz+IyOHmMJ/ji/5EfV91
76qTlsOPF//rlyb4QXhCziF1Ofy+Z/nSfmKe/VvHtCt3yeHqQnO5eE9iPrDC
W81eDruruHe5EX4g0BBwueyQHK7SrQ+kuRPzWbkoWOwvh/vjByu/En7yPZv3
e/ZZOfxWcVVj9DAxr0LPVURy5DDzeZTjOcKPzp3OOnKuSI7wjy2nKc5s0EmQ
enH6lhz6cahsCHRkQ6i3RlXCazl8++fXozQ7NrR+/jH2b1AOp+KFXDj3En7r
ckcmelQO/xXobQi0ZcMdO5MzYb/ksCry4T2KNRsWjff6+YjJo1C7rfdxczZE
CYSp2TvLY1+W1YMKMhuepRoyXrnK44RYzrkaPTZIreLIs/GTx5BOrbxaHaIe
iyd4LWPlcba6zfoy4e8cH3MmgC2PjAZXvy3KbEisfVCq8lkeQ7v/o/3dSPiN
RuLw1W/yqPD6jVaOEBsUys1FFeblse51TrDGBjY8KnieIs2tgGvc6T/M+Ij+
nfjgJqSigOt3KSnIcxLz47ha8Y+PAkY8cxdiTbJg21a++S/HFHCBQ5GDc4IF
s6sE295EKeBghZb+oTEWOFRLeValKWDga71Tqz6wQJFH9zq9QgE/Ccn85n/L
gsZaum7HVwWMLGzJ3NjIgnmBJrOLXoq4ozKANXOaBeWjrSJJQYrozS/AKExl
gfO9Z2MBEYq4SiPkhkUK8b517z25M1URQ88PDaXGseDsg+nOP2WKuP3uppnO
IBao+UjbM74oYkRvdKmNPXHfaIt00/RQwkIXfmsHMRYwjJSs5/2VMPm0zZ6A
jSxwq36u2xCmhH35sY6JG1jgkau4yixFCds+7I7LWcMCP//uyw5XlbAmOvqZ
+I9CiNgkPxL7SQnvZajl8lcXQqZ7h1OXy2Yklb9a36JYCE3cYrbeB5SRP4Tv
TfaPfBi9rL7z3RFlHI81eHhpPB/4kEY191LGM3PzlRmD+eBw3F9XPlIZoxtZ
nS5t+TA9/lisP4+IX/N85amcfJDqCPqwc1gZKTEWw/yQD+Fpz4JV3VXwtPWm
R3LxeaC5Ie7Cl2OqWOzgPT/wNQcO/zBWs/ZRQ/3eCxNaVReBVfBY8tdpdWS6
G869mzsHN9MN+l/u2YoaW/uv9tlmQHC9sU2+lSY+bFJaJFmmQo1jG+c7G03c
HcnpxqOZCvNLNrXC+zTxsDCz449IKhw3ZIinORO/y4y0Cn48CVH3Uj9F+Gni
05MrcsYiTwLzwdvjDhmaOPEtLsmq6gRkNweyhXo08fqijUm4Qgo86Ljy/aST
FjaPsw5FGidBlejzwOjDWtjLYws9yklw2W1pJoCuhcEx3duNhJPgBOfu6f3e
WnhNLfQT5Wsi7DVY+KoYqYUh7Lm1k5cSYbxs5+emHC2M1daT1lxKAKGT028X
32mhrPpYlktrPKx+K7b/26AWWpcfv1x6Kx4WFGhvhke08PbfEl8Odjy8b8zu
afuihV+u28FQZDyULpi8OL+ohXVeaeKOWvGwzSOrQ1NMG68f7mNsL4oDD3PK
fU8HbTT6GMnPKRkL35TFHlcf1MYOsUbue79iIGjt4rNFF218WZegm/sqBiI7
7wyc9NRGycX9yk9OxUD6XvLvsghtfPqhTOLjn2ioPaxvOJGnjUnFN97xfokC
zuO6d71GiOc1Wary9EdAyoGNTTc/a+Psh3NuhxsigM9wrn3pizay5V4L9OdG
wMa/Nb2p37Xxu9gBJjhHgHKSzkL5Sh3cFLXc0TASDtYZ2vpfFXXQvdDuTtjs
ccgt1az19tLBrQkHnxT9Fwat7+jthX462G2WfWlKIAy+r73Q/ypIB6/cejzt
NB8KO32XVhhF6uCt5YGZnKZQWNJsseZL08E1HUmZpQdCwaHBbrziug4Opf0w
/3kmBES6wiSmZnRws/li7RvhY2D6r0xdbk4HbaJ30bT/BoPf1gET+0UdfFW2
TqdyLBgeZ6LHgxW6OGTnMMnVEAzH9q+pTRfUxXfNWtcU6cHwajjHWkNHFyXq
5iL+uxsEGT/uxweE6aLRLec79yMDwfdlxpGDkbqo+6SoQt4rEHZW000sYnXx
hqVIe5FDIKzyX7OClKKLvVb2mpO6gRAxYRfXfUEXr545N1c2GwCuI19j1Ot0
0d0tJKzZNwAMusWiJn/qouWBJ8nD034gemPSqXdBFyWTVJNqXvrBXNpDw0e/
dTEp72RGXa0fVO10Xc7l0kPVlkc7aVF+oNhaFWEprIcDH9ipCbx+IHDfPLxc
Ww9LxOaP+Wj5wufykFCPID1MvJwZuobtDXZSf9+XhuqhyICBzpEUb3h0hmn+
JUIPRyFcZsLXG4qOXRT1StRDM1W+t+mG3uCy7W69d5YeXr1WTpF55wUDL37/
9avTw5yaLef0pbzAipbsXlmvhzRJiZr01V7QULfu+fQDPfSvqPcTnvGEnFxp
dkCbHkr+K+O/1uIJDq5IDerVQ1mVrjwOX0/oWUhMCVnSw9SnPaqq7R5A8+ab
qf2rh/GPww0cajzg1mCWwzynPjI2ffG+yfKAzOYrKmG8+shfmZYzEe4BNmlt
T49L6iP3EcVlV3UPeCbDKxC1TR/rK+Xfuxe6Q8v2zOyEBH28p5Rvls1yg09u
DZ0RTH1cnUuiLGa6AVfKJ87gVH1UDNeviUp2g+1ter70TH2MHDd8NeHlBh3m
/Sa0In3UsBKod9F3g5cWCl9XNetj3He+htw3rvDDYxfp72N9LFWNZoo+dQXh
k6H75p/oo8WHPo26h65g/6T94egLfWSJatbtLXOFvh2+WW0j+vjLbuCZcIwr
fNhZZ3xyBRk5dh90vbTFFVZ6DwXFryLj6bRf9qIKrqBwiqc0fA0ZV9/7nlsn
7gpuTx0FvTaQUfTutSYbHleYsPw3ulOWjAuNvlMLnxjA66MsSVUkY4t18KT/
AAPU0mxtDVXIeJJskbSqhwF+zy43/KdJRqPVo0ppLQyYtbLI4DMhI2O782Ou
YgYI+gY+5jIj4z5SgLRfHgO0Tucs/bYgo71I3OG5LAYc65xkfLMhY86FOVNn
JgMWdp2ldLmQUfHIMf0MLwZw7O77cCaOyE/6Y2QAmQHtD/bJH0si47C5s+hT
LQZkqL+gO5wg43LtGW2TLQwgrW//RMogY3AvMzdWjgHYWTtaXUjGZFrSFup6
BvAYa26+cJmMPMbt9WFrGPC8osI9ooSMTlU2Om1cDHBJuzxuWknGle+/Fdct
0yHO8uzEqwdk3Duw48zrCTpYNPD9d6eZjPBtPGNolA4C/53wzmsl4/zq6e8r
P9KBtTZ2ktFFRsoz1azcfjp4RCyp7XhJxiqR/Or1vXTYOhHiu+UNGR19p7/m
9tCh8YnP1NwgGZ+NNx3j6qLDCcq4et8IGVUkzYuGOuhgU0b3f/CZjNcM68p7
2ugwfMJxhvmNyC/dm5evmQ4cFhbfN/0hoyBJz/LGbTq0327R+s1BQfkjR9Lt
a+mQsRmCh7ko6DgntUX0Fh1I3Ho/S/koeJNYO3aDDuOh1TqnBShY1ayd9bOC
DlWjaiGBwhTUOSzHLXGNDtgqP0+RpOAdg7G1t0rowKNXqCdNouCnsHvRClfp
8PyKeBinAgX9uW+8vFFMh+yNF26PbqbgjpEfS7aX6eCSvGGh4z8Kvtg7MLau
iA7Kc2nkSg0Krh5+mvqBRYcZBk/4OW0KGm40ft1dSIc7PYl3w/QpGOnTeOd1
AVF/2r9FJ0MKKij8VvqZT9S/JsIAgYLT4hUb/iNYQGE+QoFKwdflbK+IPDr0
ngts4DGnYEdii/yHXKIfK78tT+6k4CHmOo2jBHsEexi9sKagfkFGzFIO0Y+P
H6Nq91BwOTeI6xrBC3sO379kT8E8/qmbwQQ3Nvf9iXakILfcnig7gk9o2W87
eog4vx/n3l0E2xS9iNl+lIJK70NVDhEsKrjroaobUY9ow+9Mgofj2/+t96Lg
1gMzhW0El85S8YcvsX7fDkUSkU/AkYdxbwMp+I1nfUgGweQXBk0NIRSMPyuW
IEqc5x/WrWCFU5AS6Ah3CHakjXX0RlPwWoSJWRxx/hpz0awNCRRc63yIj0HU
a73lDuedTArmdO5KohP19LCOUEpMpaBvaGteDFHvZttr0w3pFEyszzarZdNB
ct/AnZ+ZFDwVfsOPm+jXc6dtlm65FIz49mTF3yt0UD3sL1xYSMG/N0lWRUT/
k46yBt9epuD+3INvj5QR+XpyBuyooGDdslaQ1nU6ZPpoUxKqKCg2P3yUWkmH
SX8GZ0MNBXkKcuz9q+nADm3NUrtPwZYTjmtF6+jwO/yXs2sTBc+RNCqy7tDB
Plp5c8FjQg/nrwmrNdBhbVLqXf4uCrJbt/4tb6QDI6UhweIlBRM4G45kttDh
QeqkZfwbChYVTNtktdIh6Kz1++/vKejib5E99owOz7JiS/77SMHbhZdekZ/T
QSm7KoAxRui9Ysql+BUd+goEV76ZpqC08Qi5o48O1Io3m+9yGOAmqe92u4l5
L6jknp3lMsD8Tf0XAqcIfdwk16uuMUBHumnD9e90qLibY5W3wQB1c7VDggm/
EG47FBgrZ4BG/1R1tQm/8es4Y3BHyQBt6OsE5YUI/+psXDmrSvzOTHNTE2VA
VI/chaPaBih7Vs/0FOFXn0dG681oBnj/WK7jccLv8POmpBgLA6w33Z2qtY0B
OeMWu25bGWDu7/GOVTQGWE+XDynvM8Cy1PNWv3YzoO63HxefG8H3Pee4PBmQ
sunXrpcpBviCTFdqLGRAZnv7x+ZTBqie2xd/4ioDCsJzwm+dMUBL1Uwet+vE
+n7jK1kXDTAy4USgSwMDPhUm/bYvMcCnhzpLbHsZYKIseK2/1QCHVy8ESIm4
gtW7j/iswwAFtv7bqCPtCg6ptW/udRngQHOvzWElVwiYdOAseGOAWzdk03/o
uUJBVeEBl1ED3Pzs8j+BA66wTN7C83mVIXJcvasnznaF1RN/81+vMcRDTu//
hZS7gmDuc+3WdYboH5bd/fmWK6j+CT5cstEQF9+yDq9oI/Zrqq/zVDTEvnG2
1eYpV6jdYeE6RTPEqzHMeiV0A39HevOvREPcYygRfPu7G/AVTgwbnTBEJ5PD
uvH/3KD8Y+C/+DRDVO60JR/hc4dRnzgjvvOGeKLwZQ9dyR0OxebXka4aIs+k
JTnIyR2sit+W72g3RM4sF5XyJ+6gPGV5LpfPCDfc6z5tUOcBrVqvqocFCNaz
s7v92AMYYY7PFTcaYV3Y9b8Wrz2gkMNzXZWUEWp0t7ws/+kBIkLMlEfqRmj6
SozqruMJXOTGyG82RnjUY2f63duehH/oMOC8EcKeHftDOr1AUWR9esAlI2Q2
Q67CkBd4lY/dZucT+918c3V0xgt+vMzh5bpqhFy/jb4UCXvDaoUVt9rrjFDu
l/n40kFv2NLauWJPrxHe7apQlZn1hoi17oUMCWPMG9t/aULJF4TOXeo7yTZG
oStRK3lb/WHta6EXQVeMMXP1JcWLff7AsSm9zanMGLcFPpfUnPaHyZyEmi3V
xjgpGqFpzhcArUXe6S8ajfGN5FzuvG4AHL9pbCo2bIwm9qqXL6UGEPe9kbJS
6W34ZcUTsU5yIFwRUA1vy92GK6rNDNtLgqAxSMZs8zXAawxXh7h1oVBAYkka
2yEyj126sDM2HO5HLXF4PEe8/ebZHjXuaJC15P4tv9+E6IftBXJwHNR0q5x6
12OCJ5VsXz7VToC01r9bSc6mWLYmrfHtbCJg4Kim1GFTrHi74cHnX4nwU6JL
S/yIKVpPreqa/pMIBwPzdYRdTTHjAB/vwpok2CJpRObxNcVkeyXTXtkk6AoM
h5koU8xfrBp9YZMEAlI/dzXmEUw2XRl1LQketfVb3y8wRSXHN+f/VSXB8aCW
3fUsUxTOyPOIqUuC4bZM25piU4yYi6/xbUqC6iDNfaUVpsi3QVdd8G0S7Gn3
O5hxzxQVdszM+KxIhnPBX7xcBkzxCK8UGu1JBvHtEYF735uicVjPW879yVAk
ynt8+7ApKmpwiz5ySoab99WS1T6ZorgYd4SeazI85w4oXPhqigW+6tJ9Ycmw
Pm/+VcayKR66TXm4KS8ZTjxaadwkTsXAIylD1OFkELiYRa2RpKLcPjeK3adk
uOipuLNEmopr1rUkHhpPhqvrzfeflqOirtWmHpeZZHjskBp4QJWK16MNnkpw
MIHzm8DVWQoVrw0MubpJMyFqozS/3AEqxq5WElO1Z0Jn9RpHcKLiQMjNgRri
L5+09VzxQWcqpgp03td3ZsJD5jODi0eoWMw70KjIIJ63EOHG50XFhOxVSkWB
TEjpe3t/PoKKB06q+m06xYTe0BYe4WiCa5bsZdOZoCxUuVczloqffymvlD/L
hA5L5hfvRCq+eFidse4iE/ju62wcOUXFKJvamZgiJmQWnvV5mkfF+/w6gV23
mfDRMPr2eAEVH+xt0NtTzwSdXg/O1WwqRjf3BHbeY8JrAczGK0Q9OFT1y5uY
IJow1VJ7nYp21hHM3x1M8JTuW/+qkooirlZxhp1MqK9/fGCmmorn3FZ2BXYz
welH3rRqHRUvbWTse/SKCQUMSwnWAyreDFMs4xhgwjSHvtv9RirG6H59szjI
BMyXq+5rpuIO9UqDiSEmjLxe3L6xjYpr9TwvVH1kgoJ5aVBqNxXfvq82eTXB
hGMfz90veUGsb1ndnDzJhMexsTyPX1HxOdv/kMYUE9zu2Bf8e0vFVrvmIfdZ
JpSprOo4NkxF09CVdb6/mPBS0mTZ9wORv3ljb+MCE37zR6u5f6Jie6mhKt8S
E6znf6YfGKfiEWa+7anfTPjZ/GnvthkqWrw1j/lvRQpI15GS9b9T8cvQmw/A
mQLmZQfrtv6k4qOkEXerlSmQc6ZHVH6BirMUy85dq1IADz4a5OagoXR/8eAs
Twp47ebgX8FJQ6rdZ6m2NSlwztQIl1bS8KFRd3DW2hQYVa4pmuSmYZG86cFN
fCkgIDnz6vMaGlZi4+Qzgin8aquGeGkopPgyPWJdCqTNXXZ/wU/D5NcUrgfr
U6BufCi7YwMN+ZUXXu/lT4GhfomOFiEaGnpI1I0QzNO9f/neRhr67/592V0g
BbSaz6nVbaJhqyln4WeCD9Z2O1eK0fDzoctXnTakQHIp75lSCRreTGTUPyG4
Nz1xNkeGhheiirnSBVOAM+GhXJYsDUPNwww+EfxfyPLe0/I0ZEsLRmoJpYCd
h34yU5GGPY601uMExzgF18VupuHCgUmJ2wSXWleOHVehocPJX5HfCH5h8lU0
6D8a5vofHZUQToElnc07vbfQsKCO7GRKsIIyPZKhQUMe3fN9LgRbSxRWOGvS
MPoXmxFGcNj6/kF7bRry7sxeTCaYtWITv40uUc/GxktpBHf83IM79GkogcFm
pwj+MZYeaEoh8l+96U88wZL9HUWGhjRUvCXXFEDw9q7VPTrGNPxkLZm5n2D/
JtNV6kDDtL2XAvQIzq6J0dtsQsOzt7Y5ryO4uaTenUSlocxIo8MAcZ6vOfPZ
YmY03P/6I/0ywcLpWh2C5jR8KxIZe5TgbfF+y7w7aOjc6FkhRrD7sXK1VZbE
+VKKvrYT9cxwH3X+a0VDt8bN2wIIrneUO/PLmobyHrxX+An+tOtQ44wNDUsU
/WVLiP6sM8mZ/bKHhrtsk2r0CHbZLGg3YE/DrWNv5LcR/U0Vt05+7UDD3qLH
nHWEHm6tS63rcqSh+fH2P4oEr/65QqzpEA2/nBC3niL0tVCVnf7JhYZj7r40
MsFffTW4eOg0/Kpz4O9xQo/Pxw5OW7vT0COXo/U9od/m4h+MIE8aVjiE9K4k
uPZIat95bxoq75m7LUPoPaf/9uMBfxq+GQ8fN+Qm9JttbcgRRMOO+tFtRqtT
IHbf5yr5Y8R5dDV8tYn5YXQL5nkdpyGJKey8mpgv9RbfoIU4Gq4SNRvZ9pcJ
pDiucYlEIr+da3fNE/MqZJzrDMk0rPJxLy9eZsJCXbsF8yQNTyW4W4wS895c
Li8jnEn0f9+dyD/fmVDjXp+ln0VDhtjgoA/hFyUKtmudLtDQldJp82qaCWkF
MXPsHGI+326P+L/f2Ge+e6pxmYZ6RUMOsZ+ZYLE7wGTvFRry8XE/KCH8ypCP
+3ZoCQ1t8nMc2kaI/Jg6Rfev0TChZNpkkvC7ifAzxy1raBh25XBI52smxBwx
U3R/TMN0z4OK31uYECA9kJPaRkOXtTlHMwj/pfcHCdx4QsxHYpy60kNiv32s
5Z+dNAwUCDxFJvxbcMfyi4Q3NKzxCF2/WEnkv7U6pmCM8IvldzLTl5jgt3F2
8fYXGu7ODFwWId4POktbQ158JfLt8JDSz2JCY0uVN9cMDfWXf9i4EO+XXvsq
B68FGh5aaDfZn8AEnuhKLb01Zkh5lDY46MEEjyfXRztVzfB5VMa/5K1MUL/x
7ciYmhk+md9Q81iN8MvMLYMcGmb4nnT+5l9lJsQdvP5KW9sMSwfFbh6UZUL2
dEXjJUMz3BwZcP/JBia0b6zIcbUywxXJ8dSA2WRQOVpu/cfXDM8LsJO1K5Kh
Pd+g6ru/GYal35j6XZIMbu86NowHmmHQsxOZTZeTodjma8/LEDOcn39fYZSb
DCRQcyqNNsP+BxJSyyeTQUTyhvve02aooraUwnJLBs431XFlFWZ4YSI74qlk
MvTvuHtz31czXLRk/s6LSYKXlyO2QPB2tP04u52+NhEWbtkayX3fjsfkXY7F
lsbDvztBtUw/cyzp392XeygOLLduN4uaM8eW7jXd4sox0Oas4ekdbIH7/Bd+
lX+MBEG6R0N+iAXaneSVqHgXCYc82Oueh1ngsVsfPa53R8J8kNBNnSgLPFUU
YVvVEAkKJ34t/UmywJLErVO15yIh7ubDtIwLFqj/9KpILTUSDLhtqmrvWuDX
2XsvVC5HAJPvJOd4gwVa9q5O3XQpAl5saLYTf2CBn7RZb1eeiQAPSZ3FmGbi
+ekCnL0REXBRU9TU4qkFKra/NvHdEwE/nYZf9Q1YoGHV+BqTFRGAR8SU1g1Z
oFf06RjBX+Fwym3PcRixwCSK/LORyXCQC3wkWfzZAluObnsc3hsOtsxSV98p
C8x6KbB4ujIc8k6N3C6csUAdr8K/VlfCYTxDfO3L7xZ4L948eU1uOMTlpt3Q
+2WBmlXBXyOY4fCM9ZjDc9ECJ/1+1mpEhcOmq3/35C5bINfVE29HiLvo0Wv6
Vzr/WBD3pc9mZ93D4UZVwK9//yyw41rPvLFzOPwPnr+mwQ==
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     PlotRange->{{0, 50}, {0., 0.03417142714167016}},
     PlotRangeClipping->True,
     PlotRangePadding->{
       Scaled[0.02], 
       Scaled[0.02]}], {-0.9325684850376894, -0.6180339887498958}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{0.2601648530557754, -0.13078990767863008`}, \
{1.0601648530557752`, 0.46921009232137006`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{0.21016485305577537`, -0.08078990767863004}, \
{1.0101648530557752`, 0.51921009232137}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {Hue[0.9060679774997897, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 0.08}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"pdiff\"\>", {1.2100000000000002`, 0.58}, {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {Hue[0.67, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 1.24}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"psame\"\>", {1.2100000000000002`, 1.74}, {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->0.7500000000000001,
          FormatType->TraditionalForm,
          
          PlotRange->{{-0.1, 3.26}, {-0.1, 
           2.42}}], {0.21016485305577537`, -0.08078990767863004}, {
         Left, Bottom}, {0.8, 0.6000000000000001}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Input",
 CellChangeTimes->{{3.504478713234375*^9, 3.50447874675*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVl3k8VV8XxiWkUOZZEckUF9d8z9nrDuYuNyLzECFCmTNLZuEnaZBQkUbK
mKKSpAEllTSppMxTJON73r/O5/mcffZe67uetfc+cvuDbQ6ws7GxXV7Pxvb/
5/bclUsXtt7GX2yxrl/3IgU1cCtvC/TLRV1R1fs1B1PQo6hbl5X8StBl99N9
+EoKaicd8eXyq0L+Df01U+qpqCO7x2zO9wH668LtW5KXip4ZJt8d8+1G1S0q
ERW709B1ilC8TtUrFMZ6RDvklYamP3qXhF17jVh17Ne5otNQvCT395nSN6h5
h7BmQ0UaOn3aynfyxHs0qxN+dmElDT3/7+OR375fEQdnDiXnUjpKP1P47KTm
AJKMv5/t2ZCO1PyQk3bVAIp4Nndv3Yt0FLLhv5iQa9/QUNJJjivT6WjVmNwy
VfoDjVUpth6lZCDxx9H08RO/EC1h1XHkaQa6ly/fm83zG608eFXg0peB3Pa/
9FbL+I0WLz1oPfU7A11etzU14PgwahwJe+zMnYk04VHHcPQo2vHugpu6cSay
aN5gNeQ7iY7qFZPqaoj3a/vnRKcmkSTlaEfqo0yULeveJU+ZQpryEh383Zko
bH9T+N62KbRX13EnczgTMYYOt9X1TiNt8Tu79ktmIf20reJd4jPo/Cvt+ukd
WUhN6WXAkMsMOidsYaqvmYWE/HcKif2cQVTjG3wjJlno+/hnz6i5WSS22aLk
c1AWepeTVZdn8AcFh7O/2B6VhZ5rGGy8GvcHiTi4em1NykJ3jhRUf+CcQ+Wm
x57o52ehCkEax4z5HPrXk5O971wWOlczuW9Tzhxan9jcpHYxCyXNWawZis6j
78w238XqLBRWuGBj6zSPRoRKlmYaspCfXkVFwIV5pGx/TvZiSxZiHV1ndV7x
L+o6t91P4UUWYkhWldX6/0WXY9Y3/H1F5HfPZe7lrb8oTebyZNK7LCS70nB+
RXcBiQfTCu8NZCHhCwemRGIW0OdeV9OAn1mIGwkx1B8soKg4f7+e4Sy0/PXh
aZP1/9C+yEm56fEsNJkYNOpm+g/5/9UueTpN8JCTRpFZ/9D4c4PN9nMEj9Zn
+bnd/5BYSUPJ+QWCh1fk0BWhRbR1m1Ba0VIWauHYYfhw3yI6MuK0aLNK8Cnv
OdFXtIjO7getx2zZqMIk8dvU10WUYiPgP8aejc792qWzUWEJ3Q6+/bWLIxvl
pH9Ml/NbQrz1J9/4c2WjY8oZnwxuLKHAkpr0hxuyUcRzXZLN1BLy1sthvOLO
Rv4Bg8n+5GWUyStlfW5jNnLlzX9/LGoZZa+1zWzdlI1YN5Fq0f1l9Gx6f6wb
oRlW4/E1bCvIyJZk5Eho/clzPS8YKyjrvyeJWwitlmemOJi+gm748ZclEfPJ
as4fXX65gsREd89UEesJ91zqFBZYRczgfy/PEfFwh+6R22W3isY+vcuiEfEu
C62FGZ9dRUuGfVlXiHymam90uH5eRRElW9WeE/kO2jlJR8itobYNU53XCB59
8xsO5xxYQwcnbvWaE7xenK57XHF1DXU+e11+5f889b3EHoyvoeSw/so2gveH
Q+l1o+JscCeRaVpG1KOTT3cjhysbhK934yqayEI9loJnumLZ4FlEcO/ySBbq
y5hQPHueDc5vKl/Y+SsLDXJeYah/YoMw2dGmj1+y0Ag9+c3CEhuUbZASP9Cf
haaS3Pc/lloHP96Wmt99S/hjRSzRwXkdGNi51j8m/MdO+bNZPmYdcGgK3otu
J/wU/ap4/Nw64OTk3bn6kOin+fR7x/rXwTVz8bcBdVlIZeLf/A1Hdqi4GaI6
UZSFSGrvUiKPssNadfl64VNZSNf/jjDtLDvczc0u3ZiThWhD/lrv+9hh2nZk
5EBCFnL88jFwncN6CFgVNp10z0LpXc2DdvYcsKKhxXNDPAvl8J4LlY3ggLSj
yq0cW7JQgUUE++gpDjgxXnCFzJmFStrVZRPfckDXZYMpqelMVN9S4nxtLydM
peC6ok8z0c9bST2rNlwQwyv2S+lQJhoZc/V8FsIFVs8f9mt4ZKIpFcOpk/lc
8LmdPi+yNxMtV8zwKfdwQZLVrxtJRplIuMTL3HbPBrB3j9r3k9jPaLnGD69Y
c0PxJbYm6wsZKNGi9mpPEDfwnjWpe5GXgVo45U+unOAGy0ruSY3kDGQYy+Zj
+5IbTGv6OGt8M5D2wXs8a2Yb4cSWMzy3NTKQAl1znz1tE1QbvBubu5eOuP5K
T3Do8MLYAyWTjx1p6IDGIp8mHz88ShP24X+ZgnZ/TCsX38oP67jsSu43pSBy
mgjGpsEPAfPHDQ5dTUEcX0mHuln8cIrpqPM+NQVdzPF9HljADwVpwqm/qCno
63hv6jUpAcje2GZmevc4crxRtSavIgiamfHaQVXJCByw0zxGgvDbOdDfsCQZ
KXG8UJ+1FARflcEm4dxktOA85NoaKAjhGW8r/wQlo0IemfsetwVBYVYz1E8j
Gb3xz4wq1heCU18EnPbUHENM5QPToqbCMBFe5RzSkYQWs8LvfbYXBhXWP027
e0mociIl5bKPMFAtltTMbyUhjtoKCa1UYdju/P6rd0ESasJ/U5lPhIE81rgr
0DMJKe4NyE+mi0DK7Z27ulYTEVvCEe0pJAqfLkoK8pgmolvfklbqrUWhFtvH
UKIkImdG/tM4d1GwYOs+vE8zEdVvrHHmSRCFQ2GpxaNSiehQwZ9kxRZRaLTX
e9T7IwF9uBrZ60IRA19LhtBhWgK60xsX/kxfHDRSih+ZScSjyhTv/d/NxeHQ
ar2OA1c8uqBrab3kJA6yD/d/zZ6NQ5lnxJV3xYlDZ319i3dXHPJyqfmU90gc
9uEHOttT4pDw4G+6g4UEePDGdfIvxaKIWVvBX86SoP3mXpnXSgw6dNlwbe2Q
JEg6zm2PnYhB++3kxsTjJYHsPzt762sMsmqYeGJRKgk5j2ZHPVtj0M6YjKO3
BiXhuEn39+n0GNTH/mAgPFAK1C6cfu4qGYOMBFWqOBKkoTz6+64wy2jUtc7p
WWeuNGznKuuloWjkMZ3xo7BUGl4GFk3JaEej46+GxZRbpaEx6/T0X0lifM7V
RCanDBj0ndhIGj2KPHiUbQqzZGBbr7WT44mj6DiH0tzOM1vhQgP8mX4bhXyX
8ovLHWTBM3el5vWBSBTc/ku7irkdrjt9ibbyDkOZTlw7Vg4pgJFeB1fi5cPI
62mMj6afIrhzOOQGefgjb4qi1XywIliaLLP/NPFHPrdf6dyLVITPermf/Hf5
I7+iHZzGaYqwlPBsR/niQRQU3H3JoUIRSqY9L707dRBFi8l/SxhUBKnwpIOo
2w/l+z537vLYCVrVFl0nrXzRow0SewIclWBTslXzjURvNHRJ3eKDpxLAreKT
6Qe9ES8w6Kb+SoBJcu+JsvFGDlHBOvIxSiB1QsXtpII3mvz9ROLjeSWQTvj9
qP6ZF5J5HvLdYkAJTItssWtiXuho9stQFV9lcLGbU1l95IkuKH0/dCZYGYJf
5hgxbnqitra/B7iilCH3Rxp78RlPxL+y3eF7ujKM3Js7mRrsia4EHqWcu6YM
b6sr/+hv9URvrRQ5N00og3qwNJ9IggfSFEgsHA5TgR/+z1ekit1QE/d7paex
KvBVW0CmMdoN0djU710+rgIlmxOkwxzc0N7Jj1/dC1SAtaus01LYDUV06im/
q1EB4a6fhdEnXNH9jMl7rTMq8J9j2OVPKS7IjN39W9FhVaiS/Ny+IdcJvf5X
F3o0ShU+by2IrznshJymebn2JarCLv0LTYk2TihgoElFME8VomtbRBNFnVBO
i2hYepUqmG/b3ydc6oh6o7u4widU4Xfl/f+u33VA7rOYmtUhNRjlq+A33bAP
8QqyveoNU4Nk8u8NSqP2qInUGuocpwZDJZ67yd32SDjI5J5fjhqwrsrv7T5t
jzp+W1kkV6tBBet7kpCqPSJ9cfdr/KMGJQEsmHO0Q5+X5XjRihowbJ/cPA92
KFNqsOoJ5y5Y+ifffGSnHRp08PvbI7oLVDzNWeVze9GZN4dTx/V3QUy7uLRu
wV7E9izp8va4XdA6m3pKqt8W3fxFN7uasgt2tNB5bz62RU5cXGMaObsANA00
gm7aolp6pjZWsgvMtv8YTkiyRX4t+a37Hu0C4fl4mUFVW/Sq5tJANqc6/NFI
jWjLsEFxPQeOC21Wh00GHk4uETZIZXqn0jlRdTDMc7bb4WWDjqvfCL6yUx0K
SW5dFpgN0r9au/rIXB3e6Pqb/pzdg0ovPJH+e0IdZql5Ex7+e1CRi9p7u0J1
yG8h+Ts77UGFkif/q72gDtuqVmpSLPag7EIPrpAqdRh0ELx1UHUPispZmhx7
pQ7aaZWDQZMstCde8/F3IQ1o4Dsk6JfIQrspZ+Ko0hoA69yaXUJZyGxxVa9U
QQMu+fhUJvqwEB7x8oarjgYkLvP8sWOykEqQb2GfvQZI3U0UJcuwELtb8cGu
sxpweGNEOyvLGq1IcSjsuqgBE0ei3vFEWqOFD/5fsq5pwA3GCsd2L2s0Yadv
a35PA1Y1+QrcKNboI/MNpe2TBgzdXf9+y6wVesdj+Hf7Tw14tVnQrOibFep5
Vno7aVwDbm8RME94ZYU6jIMU0aoGyMRFpVtXWaH+Cxzcn7eQ4M9FqjvXESvU
t6J3gFeYBC7vOVst91uhty4BrUbiJHjtu69wyNYKvZLsiT0nSwKFkc0fJfWt
UHthyfQ+TRJIfHC3OcJhhdrmeqzSdEhw9pNFl90CEz3ay3Wj3oAEab/UhLPH
mOi+YKCPCI0E53/prx97y0R3cgw/9tiQYGw1XjHgBhN5Fm3mbLInQYTiC47Q
S0zEX/ldvcyJBGw57kdazjFR0KPMY8H7SfCu9q/y1kwmkulyu2HvQwLxnb+y
NY8x0ct+rXeYPwlynq9dT41mIpU//cq8ISSwNxXG/wQw0Qe2KtvZcBJctzzV
zHOAidL5kuP6j5LgtNBeQS83JhpSVH1dmUQCEVMO0+49THRKe20xN4UE23ka
lX9YMhED3ihEZpCAqWDwi2zCRBcdY6KM/yNBqtTx0VwjJtrjY31R7RQJZiOX
VM/oMhFbqPxLobMkKCiuMPykyURu2S+2fS8lQU2q+TURZSbiO1ti/uwyCUKt
/lveuIPgUx4aWl1JgoWhxjU9OSaSfCD1NL6aBLVjl6ZwSSZ69mJy6kAtweOx
RIeoGBNF9T2WZDaSYFftgLyiMBPt/HmaQb5PgiSbixGHBJjo3XRAkNRDEqAW
ba3hzUyUsorOsLeR4OGW80+LeJmIzCPcOvyUBJu7JK8kb2KiH2K/R1+9IMHw
YXUo5WaifIX7Io3dJLhJXGqnuZiIqpmHSt4Q9bY+7BjOyURTmPfB1Pck+Gkv
UKfGwUQlFvonAz+SoF7JMEl0PRNZ7eNt3vuVBIxVLhUtdiZa8RoYMvpBgrof
i5IJ65joxuFafvlfJGiJ4XqwzMZEznHphptGSeD1IifxGqE3Zbp4T0+QQJU3
7Fkaoe8WknL6Zkhw67j4+gJC+13iaHwwT4J7Pr6FXYQWq+77VrFI6DsfR3WJ
+dvv3+DJWSXB3m1pAS8JHf4sUSecXRMiOCXicoh4FN7tdXfh0gQX659psUS8
b74rZdA3acIn/9GZU0Q+xyaX76hs1oRy7LNCP5Gv5vKrTwKCxPdSisfNNjDR
AHc51z8RTYhpno4YIHjlihwlDUhowgZDba8ygie+nen0VEYTupev38okeI+r
yx2/JacJqi0zLUVEPc4bzd08tUMTgo5G/3vDz0SLe4vXee/ShNDe3GMNIkx0
1fOIqqWmJtw3yy3yFGcihyBjOy0dTVg2ehRKkmKi+rTxSjZME7K3e88bEH4J
bcJYxbs1Yf09NodRdSaqdXrK/oGlCekjBjIrWkw0v8iqE7bThC3SD9zIeoR/
jLwls101oW/8sjE/MFHs/czB6CBNMK+2AT9bJmp2ET5dH6IJOwTOJuc5MNHq
crH5TIQmhM99VO1zZaIk7PatgwmaoG4fe7XVj4lSW95HOeRpguX76iOTCUz0
1M1TtaBAE679C5teSWEi7rWRz91nCN4Gq4M7spkoE63STMs0oa5WGH9whuD3
UIFP944mXPxnk72+honOtB4pE+rVBD6PuWvkUaJ/9y/ZWvcRPDitNVJmiP5Y
n8KV9UkTdsKW1R//mKiYfiaA/acm5PFZfXzGbYUutrXoTM9pgp1VRJrCTit0
vZ3neZeYFghtlpfIPGCFWp6Xz2Q4a0HWxqovfD+tULX4qyNx7lpw6hafWtSY
Fbrkszh12EsLtpw0tPpK7K/p7NaT+wK0QD9/tOgiuzWyNVwY3RGjBemBmZGz
26zR76sWPx+d04KgLflloY7E/vw3zLvughYcWX/R/5iHNeoyLvlReVELPtV1
vUv3tUY132a/5V7Tgo9Ss7Ex4dYoXqL4i2uTFkwrX82eyrNGQhmT7/990AJ3
gby870+sEdd7iX3jn7Xgou6v7cyXxPmgwHg38E0LxiZF0q73WKMvD8/0Ph3W
gitwcZX21RpVLlBfn/qnBZF3tY+//2uNcL+C55oS2mA4/KNfX4iFSPUt5jtk
tMH9ha8DuygLyXMMd4jLacN5M4uoNnEW4i7Fnq4paYOxe46n1lYWevN+6HGn
vjYkKTHNapRYyM/UoPmggzbEDt5OwCksNK4k8eS2izbckUv4ch9noZBN/17+
89AGoQG5u5pUForpbPyUcVAbtkdcbVo1ZqEcW/3lq9HaYP5JZ0nBmoWEdMQ5
ZuK14UrfKtjvYaEzogs8hsna0CmOtcbZstDFDw1Sz7O0Yd6n2KNqHwvVuesZ
jZzXBuo154zz7ixkSBWja5Vpw/TfVvkETxZq2f7XIrpcG0Z8zfv2ebFQx896
p023tEF5bTx1lDifPwXoRqs80IZu5abXRYEs5MkUPRbyWBvIzsECGsEsNKQ+
n9H0VBtMnEb2Nx5mocnpurMWr7TB7YMSdpM479mjdO76fyPykeUd23aUhdIc
RR7d+akNj35vfOsVzUK8RnMdi8PaUMNW3F8cw0Iiq7V9mTPawKHtZ/wnjoXO
fS0Y6Jkn+DQLVvMnsNDWR2G/JZe04Ze/Fk2euF8oHScvXFtPho1td4ZVjrHQ
zQPCbLMbyBATOMopm8xCWqZ/NhjxkiEgmrGP5zgLGW2qFXshTIY38kWVbSks
9HD05DYhCTKIZWVW56eyEKMzdKezDBluJR9dsU9jIas8bb3RHWSgCAREtqYT
9T0ihLRVyFD3VOvmwQwWcrCdNYlRJ0MLI9FgQybBi/zG6rEWGT7c+yVbRGhP
0Rp7Hj0yyLTw+e3IInj9zXezNSKDrUu5UAWh/T+E+BQhMuyxC1KSySb4NdkE
/aCTYdZa+3omocPOa0WompGhSq6jdILQ/+IE40N3k+GrLPdm8xMsFO8+k3KP
RYZTyb1/zxJ6PbXnxHo7MlQ8F/T6Ruj07XdOWTqS4ZX+9b3bcliIjyO/+KQr
GbLt017bEjr/55Hyj55kmEnK+xJPaNGne27K+5BBNOtWYimhiyo16wL8ydDs
0n6/kdDtH7w6SoKI8eeGfZ8SemZT4cc3IWR4L6nA10norZSOiQ2RRPxe3Lef
EdoicHEdJYYMjp1yDs2EjrigJnI4gYg/ZparktAXu92ULieTIS7g76MMQnex
/WfUl0bwTi4+sZ/Qi5qPrXizycCstQjSIrSi15wn5JHhkLyD3z8iP5uCneFh
BWRQcRVMbPg/jyeO6ZVnyNBa0Hj3EKGvzmcVfTpPBvXxGAkJQvfubLnFX0aG
sZfxl+4TPNkcpx4xysnwwqjXeR+hHe7t/X3jJhl+p4b4hhD1OT6WujRwmwx/
QnNbZ4h6Vsvc3SxSTybuQxXO/oTmTpTRiWshwwGLCntE+IF829rsdisZ+E72
PjhP+MXje5Lzz3YynEUp4dOEnxoYQ0nMbjI8PqXQm0j47Xu4+KmkN2QoP9yc
fI/w4+YrFpV178kwfUXtxDjhV5+NVV0yA2RY+sXZpEf4WbQrUmpiilhfPrzL
m+gH2tpV9e1zZDCe3VbqFM9CQaRPVPt/ZNCYjftuSvTPk3zwa1mnAyYH8Mfc
RH+F7dtYlyOoA7eZ/ToKESxUmm7U0SqqAyc/NnS9DWOhl3cDP85L6gB3jORI
PNG/CtI969zldWBd93BVA9HfbwbOWWmQdeDyhEjlY38WWhXo9PTS14Ea2JCq
eZC4v9PXwk5TdMC7vGK20JeFjpV7Fa0xdIAz2iTZzJvoR3+13912OkDy315o
4spCebPNSYcjdUA8tzuoirj/B/bkebrE6MCZwX9b7lkS/rntRTVL0AGbGRef
B+YsxBm8cZ1smg68Qx3kO8T+GD2yN7G7UAc2fhrzBoyFDnwbjVev14HqVIWA
NRWCz8MWN8kmHYiK8MsvJPZj2ZL/cK4WHaAJbA1XVGShfhe91c9PdGDeRSOI
JMdCrL5jcSfe6sBdM3P9cWK/N+yWiB37owN2e3jiNq1jIfFbY859CzpQnr3M
47xsjeayHxi1LeuAW8imsvx5a1RtcWCpiEMX/CovOrwbsUY72qujLYV1weSO
qnQ1cf7wN5sevaatC24TcptvlVijn9fCI/xCdAFYJSpf1a3RXpnVL5URusA6
mH2uTtEateWmmg5H60LEzIhxzFZrdDHstLh/si6k2Iy59PJZIw/8blNAgS5Y
ST2ebh61Qp9eL68G1esCF8frbSGXrVDvQnJa+KIunJGQ/xS70QoxAnin6lZ1
webZ1uu0NSaq+VzgMM+uB52tV2HhD3GfbS1XjuTRg8V1LT1aA0zEyn76Ikpa
DzwF0iWG6oj/h208/LG4Hux65WxnTvwPPDbJP3PsmB5ckdY9JHdpNxr0udcZ
naoH/YFlvY2ndyOOtEH20Ew9kP4Wf4KWvRuZPNUN9MrXg6Q2w0W18N3ouelH
KuOiHtxc/rLqarIb9ZgpjHK26sFg5R5frSFL9N2iHstYpw+xLW3FN6UsEZt1
//fcRH1YZ/thw7irOeposZMPO64Plqsviv2szVGe+msvh3R9ELvwk/s9mCPZ
zR2Dsnn6INg/7pAtb46gs27odok+GBS9bHL4bYYSLf8bedOiD7a0/45FBpsh
NjOzGbEVfdi0y9/2WagpWoP6daVHDaCTvJghZ2eM0sT+MnvSDKFapMr8wTZA
wU5erX+TjWDbh2f3PKZ0EG/JyAAl3QjuKqbdHG7TQdd+HFlLyjaCA3YOrIyz
OmjoUCKF95QRVHQ+37yFroPcEorrZSuM4EWKoKTxaTLaffn9NfMOI0B91x99
YWgjpQnLk0W8FJBmi+5taCShdq03twf4KdCiUZug9R8JeUc6vdohQgHeiZ7Y
twdJqITtIF+1DAVkuk/YFkqRkKhQalqbOgVUDl39JMuugTj0H8aMsyjAdfsO
R36lGhpIInujUxQQcvIY4MOU0A7RzTmHz1LgNTfX2MjiTuR/7VdDWTEF+sOF
Hqvd3Ylme87xcFRQgKbf3TSguxNxKayr6ainAH3ii42oniLa1d65zqaPAl/3
kXu3WCqgEKcrqsmfKGCd9Ou3/xYFVD+RaFc7QIEPbxeqSb3yCMTIV0WHKRC7
nMFacZNHe/3OsT7+owBPAaoqPbodRW/yLfGWwkDz4bYqrcey6MEFeHZqGwYL
YoJzzBxZxKEtOdsuj0H67mDBd46y6IRzp4myGgbv35U1Og5uQ6U3tCfGKcT3
X+gWv623onYrNizSDYPm9buna6ylkNDJs/0ZZRiEujbsrJ0UQZveCr0OKcfg
TryJ1ly5CGITy3nqfBWDiuOLFsMuImjs3LHaXbcxaBxI1f39Uhi1XwzIef0Q
g77Nm4U16oRQ1B2MJjGAQWamvJlJhQAK+tOgzz6IwdGGm5W+vgLIW1dLY/QX
BnwB/K0kZQG0p0lRunkSg7fLZR/rb/EjldYt8x5rGGgHygfNH9tC9PO3q5Vb
cfBWpLtTN/GiHiGX0v+243Be4n3NjVIe1GH3rjBaEQflG4+lLPV5UN2H58m7
1XHIff4kUiJgE8r5VuM6heFwmNL45ckXbgTTKQL6rjiozT5xLlnmRLrabNxy
njgoVr3lsC7nRGrh0asbD+DwdudEtYA1J5L4FzT68RAOvFJx95+Wc6AZNocn
CbE43Bm/MnPPfT0q51c5+rQIh/zEL0mj69ch9SHHBY5SHHp3p+3uq2dD9fcy
ImmXcTj2/kn8gD8bavcZDm++gYM4w/zQ4Rtr+O/7lSE1zTg8ZJdMOhK6gh/O
75ueeoTDfSsp7YMjy/g/X+4j6u04nNiRq3fIaxnfJOQXfLULh6+RPKfinZdw
tYM7D5V8xYHOPXIf8/qH1+L7Rj/9IPK1juX/N7yAY8Jp/pK/cZC6p9pUELKA
Wz0Y8js1hQPXfbs3+zL+4sEiFQey1iEwb+j3P/pyDr/zSME9krCl0JXDasWX
Z3DD03u/1O5EoJK59eeIyQz++NBx1xlVBJ5+evvaR6bxXrFB50AyggZ2jdOC
etP4fOAlBy9jBCf2KryeaJ3E4+lv3pcS286olSVuu20S3yCxft8XJgLpDGvX
lPgJXLxtv52jPYIWXP6vmvE4biC53cbaF4HeM1e5lJkRvHVyz+vsAASGZxt1
bLxHcIsnSaznwQjuGx4zutQ3jDsd/mZlHIUgTHVr8s2O33hse6mlUQYCM3zf
08AnQ/jDkG3GO68jWEfB6zVUfuCLc5N50lUIEsP1jms9/Y6Tjz78JFCDYMMN
520zB77jlQmeYctNCOKkPPJzKr/hedmXLr1+juCbZkxsLnUAf74lbLK9C0Fx
W+e9wvdfcY6TDKP7PQiCH984rKjxFY86+7Onoh/Bvi2JAu6/PuPuFTvZY0cQ
yPI9cJ6L/oifUV5gHplAYLFZd9PYUD/ec6PjrM8MAqsr9qGldv24Sc1BzT2L
CCT29eWIGX3AxQbsSEKcAA+krIUkdrzH18ZOu/8WBthCnGfnDr3Bz6sncv4Q
BbCaiGC/tNaD6x/2u/5ZHCDD7nHW84IePGRW/2+PNMB9Cz7ZvU9e40P/PuQ0
KwBs+KXX74q/wpONWsmNigDP3EcaP7R247Jx1/rvKAEUXrHNusnbjTuxxShW
qgFMih5T173eiXdxSbfkkwFenGhRFxZ8gQeYcXifII7vg8aff+4Me45zZ45t
JI4fEPMQ/Bv+4RlO42u2i6MAXBLIt0y72YHXC7mN+zIALP4ZPP1ztB2/IFsq
je0FeMqhQWKeacU3Z2p27LIHOPBo2f+9ciueMNsautUBQHnBZepO8yPco/3n
8zVnAEtbz7NaYw/x7YdUj7Z6EfltqGJ3bW/B89/eV6g5AODkvVVAn7cFX4+s
Xl3yBWiSf/WR374ZHxQ4sjMlAKBzXJ4neO4eXtFQ/9Y0FMDHIYrzncddXFTO
LEk/HKC/34vnVFsjnpb5QU05EgCefJd7qNqI+7kuJ2+KAeiljnGIcTTgKutp
Wp3HAAwNbrFW+2txoiafm48D8Cw4Fdo41OI877wzbqUS8fI0fszvq8HHKtMG
cjMB+Byl4fy3O/gtq84cm3wAY9FaaZrwbXxro5shvQDgrUahifeVajxXbuqn
diFAmk6FPztWjR/+I4iJnAMQHSuTWP1yC9c65zD6vgwgpEpA2HDgOn5x/Uhh
xyUAD1HR8CTV67hQYAztbjnATITa85Xoa/gfdOHsuasA5oaWL4wUr+L1P3+Y
ut4GsOv/2nT4egWuaB0+y6wB2Btfc5BNtAI/3chVgtcBnB5WVJI+Xo5HZSnP
b7sLUNwZkHLN/zJuqBl8+ftDgM86Pv4S7hfxa+fYWG9aAb69OH915UcZLsWR
v/S4DUDxmaDPp4AyfPldrU15B0B3bPSQyfFSvDl2kc3vFcDv3IB1cjeK8fmq
oaljPQBySfRi0dfncdKPnoHiXoBMlsjnoaUi/LL59Ydv+gC+PtyWmLr/HJ4p
6pKIvgEofOfP+Bt8Gm8zNzvs9AMgWcv30/SDQnwlluwR/hMgeFivqlG4ED/8
gxeuDwPckj1jpvWyALevbl4TnQGYO9965EpwPp734+qk5h8Ak/y9G998/w9/
Jlr4dfc8wPpCm3e/Hf/DKXFBD44tEvkVHDkdaJuHb7fYljDBTgXdyIY9/t+z
cZc4nuCNnFToy+Jz2MKejZ+q/uumsIEK+2wjm7coZeHcYq9wJx4qFGXkyUan
ZuCTPxJXnwhR4eij4R+56am4kljgxIAIFTb3dltfepeC77dw/LIkRoWU5Os3
Pyin4O+qNVs0pamQ+fAcv8LXZJx/UObW7q3EfBx/8v9AMm4utumCrywVPM6u
LXhcOYbfj/seV6xAhV2CH7Rzk5Lw+equwEZFKkiNb+oVmkvENQabXN8oUeGH
XtTQ3UOJ+EWLk9jGXVQYZ8mJTHXH4+lijJUwHSrc5L8XniIag7dakMZz9ajQ
c8fctdIgGl+Kk/58zYAK6mH5s75eR/GgwT/3BzAqYGZmluzPI/FKsW83lhAV
rnoknzjGFYl/s+g8L0qjwnHOhpARswh87+3y2N0mVNCeNc7q+BKG5wz+d8jX
jAqt2UFy45ph+FOxeJdjFv9f76GQfWYobhhvT2m0ooKwWYOcq0UILme5YVl+
HxV6H1SXWa0/jJPf0nskHakQ8/q0yHqeYNzEPbFSwJkKJ590PrgtGoT7h/7b
u+ZGhRejFQfl6Ifw2BUd1XkPKpTI8PomeQXguWkh68b3U+EiH5uKX6Y/Xls0
erPfhwpt73zWhEf98PYdSsdf+1FhMdrWO1nBD++r8nbq8CfqldKj+MzLF195
/JmrPogKqe+Ld+vNHsBNxrrd/4sg8hHg73Lb44U7RPDqpkdRQa/7ih61bj/u
z2bOmxBNha31Vr2dMvvxXOHWxkPxVHCTfdPmseyBX7ywmuOVSIX4+00vFEM8
8FolowNOx6hw3lr2sVqfO95HqRUwS6VCQ2wuZe69Kz7SPvULT6fCtXTvN/4/
XPBl1q4WnUwqVI35bNg974zLHajwl8+hQqjgOq1oTSfc/8SZx6unqKBadkps
5q89Hiv29uzcaSqYVn+oVDSwx3PKBA6PnaVC7a6yWaNEO7ymLlO6v5gKnm53
Dzpv24u3o6czr0qosIdm8V4g0hbve7b+2dMyKpw+YBG2rtcGX/4cG15XToXr
bBJTU+f34Jv97lreuEKFg1Yaz8u59+ByM3Nyl65S4czL4fsrUSzchCu4K+8m
FUZcT3WLdVnhueqeOw/VUcHsZ5GjwIgFfrGxeGV/A1FPWWGtQA4LvJbW/8bx
LhVkTkOioKI53mdvm2jaTIUFfp5A53hTfGQg1x5/QIWk3WHfT9aa4Cv+L9V0
HlHh0lSXD5o2xrcnGH/Y/oQKt+ruH1WOY+DkjceqJJ4Sfo0sCeV+ScdNTrak
8D+jAsMjE4pk6XjAFT2t1ZdUUNr/4Z5qPxWv7VbO+tBLhZltcZE9wgjPk39U
vviOCjry16QUJjA8INLhodQHwk/viucGXlPw7dvS5lw/UyGH+3CuQYMhvhKy
lT/hKxXWX2YbVGk0wPva61RKvxHvp32DtFr18dygQffvP6nwPe6l4u4pXdy/
NSZ6/W/C70g0qUNIFzcRFTqlMEIFLcdqhgbSwZebqc99Jqig//rFv6s3tHF/
vhLy6DyR31M+SauPJNzEU9ea9x8VZCOXXTbokXC5us6Du5YI/2kYDxzV1MD7
XJYvBK8RvKdu3ivoV8Nrqk/ezVtHA/5KfcfoB6p4Dodq7+31NEDFD7Xabqng
xjccN/7ZQIMbuz1/CV1XwmXZpuVFNtGgAK9Y9GvYiS/bpuO6vDTQU72e+fCl
In5nqT40ip8GT+Wsf5AFduCylsJflsVpEGMVkT63IIcvX7i+ICNFgwAei0w+
Yzn8/QxNCMnQgL4swvx5WhbPOXfELEmOBnb2nHXNZVvxgxPcXhflCf2o1kc0
UAZn0ErjHu+gQRlZIk+cIY0vDXfd4VShQdUTmmGQkCT+DvPpVFSjwbJQi9nc
Jgn8zn8rv0zVaXA7tudWNq847megJpOpRYP1hhXSR9VE8XfpGWmbjWjA0e7Y
3f1WEL/zSfaiBkYDU5f1k2bCgvgJUuN9FqKBPNY5YeAkgDP6hqbz6TR4PN0Y
9H5+C75NLZ631pgGqqEKHswbm/HFBJGdb01psDFRJqEoiA+/vZPhIrabBmeH
+R0/ivHg2TEfI/StaEDh2m7xc2Uj7tcd8p8jiwYCIprZfye48a2RZe1Fe2kw
MCLu+d8UF57dvkqSdaXBS4WpveM+63E4MqQp404Dy76zSU1X2PE/Ul1akp40
+BI9/OTC5Drc5UgxWfgADSLu3j594yQbzi+doiPgSwPHfJJEw5c1rK39kO7m
gzQotaRnOFxcxXZJU/S5A2nAtVNNvXL3Mva9Xd6AM5gGRoPH5hK1lrDCIzyG
7EeI+lxOU57ZvoittvcbLYcR4xmhQpLbF7CuI0fRVCwNDCVH54ty/2DHpD1h
PJ4Gpxdeqho9nMV0n5pRRxJp8P4I94f7CzPYBWlx+uBxGngckNlFT5zGbJ6u
0b+lErwPif691zWFcYX8YnxJp4F1Y9HeNfkpLPhpvUlfNg3M4t2iXz0exxRC
Lpi+zSHq7copo1wwhvVJp5r15NGgRHNTrebhUQxC7CxeFtAAG+LLLDIfxvhl
/jAfnqdBOe3Q30sRP7G2px+tmi/Q4OKRyh2aZwexqJDH1k2lNLjMk9zr1vYD
G3iav6f2Mg1yd6Wb2mp/xwpCom1uV9AgL6huV1zEN8xMZr/trUoa1GbuKOd7
NIDdDtG0q7xB9IPX54gT775gPjIS9uW3aKAR/nK8u+AzJtnBtu9iNQ10/1aV
PHL/hB2TeeVwvpYGExLL559J9GM2HUEuefdpkHUb1awJvMO4Qu1dT7TQwLv+
sqq68lusSQZ3y3xIg/lwIXqFeS+2PZTP43gbDf4Gx1zjLu/B3snMeSS1Ezxn
21aNv77GMjs+ecZ30MAq57+WELnX2IzMDa+olwSfYkbEk6hurKLjpHd4Fw2U
X+ad3a7chTmFxhwIeUWDbWEJ8Ty/XmKtHRa+h3ppcE3l86aDGc+xk6HD/h6f
iPdccvDQqR2TNIk+YvuFBkUXsONeQU+wi+I8USYDNNAyji2Iy2rD7jSrpagN
0kCF5/6piwOtmGFec9a2IRpUBot7LIu1Yo/2W+UL/qaBe9gpf/99j7BXGw6X
LIzSoDAOgtL7H2AO/WwVo+M0sAiafqaR2oIN3PjvxpdJGsSe//LrAmrGJvfU
3G2bJfguKnDf/tCEbT4//yZviQa/hwIb2s/XY4VBaf3JKzRImYjku1JZh8lQ
xb9FrNHA/t/NlykttZjakMGEy3o6qMZHD97gqsFqG5//seakwyac9VdH/w5G
yXJeom2gw5yWeSkechuzJMVxK/PQYdHVfv/EchXWw755izQfHfx8fKU3lN7C
nN5eENmyhQ72rxjOeXtuYv7RD7fPCdJhA+nE/qufr2HpbeuxR5J0+BXe/kMm
qwLjP11Ar5WmQxjXGfnG/HLs9MEdFle20kHsAOVE/eXLWMVm030nttOJC++P
M+Shi5j6t/euiQp0WOd4n21Y+CJWX+PnHapIB4rcbKf/7jLsiUPmEUcVOtCF
tChvK0uw3apSUbvV6PC9sHVrpNkFrHflejxSp4N+o9rS6vx5bPBiZ9YOLTrs
PFUtaxd/DmMf56+YNqCDbK0D+1HFQizzQdmNQSM6XPbVF47edQoTyNeqeY/R
4XfUxQdbUQEmq7f3YTOVDn3Xx/NOJuZjlRt/tlfT6dCkv6qbW/UfRvoU3nnJ
mA4p/K1bU37lYSjpdH+GOR3yV07YdHzLwdptlb7FWtJh8hldSiv5BGalePdX
MJMOT6Wwdy3a2Zjbi/4/dnuIeJ5ENjY/yMCGigOWzGzpMC/822/1bDoWeHh5
HcWODg83zRatJqZhsSJbt2x3pAPPXata6dAUrPP2RifkTAefA+yyg37Hsa1W
c5ddXOmw0pP7Hx6QjD1IfWl42pMOWua6Y14nkzB++caUWi9ivjXFO5KNiZjH
g0uvXh+gQ+PWJNvIrgSMfSHah9efDulkLrtrT2IxmwKf28qHCJ4vBOK6XWKw
SySbZZMgOtG/gQwSZzTGOKicnxRC8Mq004lOjcROcYp8vhBGhwemPK8HXSOw
oTI2pfsRdGi9eFLxBD0cS+t/3zwfTXz/2Wz/nG4o1hfxmFs4jg7f9n4OiaSH
YEpCVbaaCQQ/R63fTc5HsOeWqcMByXT4ocU8d9MpGJP8fYSckUKHMmryvNWL
QCzguGtCRRrBky19wcb6EMbbTBb5lkWH1cXS3B8nDmKujrIeqyfoYHLB4WeT
iR92a47nulQeHQ4I2YZkbPHFrNV/gH0BHSqHemR5u7yx0uddWaGFdHhRUgb2
rV7YlE/Tu7wzdHC2VnnR+ng/ll/y36EX5wk/NcTcTxv1wH4YxTX8vkCHifmp
J7X8Hhi5z4+dq4wODXKitxyT3LC3/HAGyon+6ioU+R7njCneVP3heoUOe8YP
dWWJO2ER5mLqMVeJ+l3o9xpvc8DEj008rrtJhw/ZfEnh1vbYwa39m99UEeOP
2q3nULPDmpqeOE7dpsOTdW8DJMT2Ys6z5ydV6ulwrNciYbOoDXYjN93QrJEO
its0xoqV9mDLqmEpB5qIfNpaVgVNWdgFb0up0hY6lDxTPPPYgolNsun5ND+k
Q/PVlmRmhyUGxdtv97fS4fSWI+5WjhbYt7f/TESe0qEjL1d3/LYpphXy8z+t
Z4T+my7WFmmCHdv8+pP1CzqcjDG+dIxpjCmYVoZkdtMhtWxPa9EOOhb242Tz
ldcEn38HzyQq0rAnCQncT97Q4Q2P230PMhXzabS/sPaeDj85vHX4hnGsYS9t
WLqfDodpFunalhjGPb2LbPiJDk5eyveOtxphV5U5n4cNEP6wyTsSPaaP9UhT
lwK/E/vNjnMd/+7oYctb4tR8B4n1rZ9pZqbrYlbzf3Icf9Phtl5SgKAbGYsa
Jj20GaFD6Qmja40u2ljZp0PTlmN0EDnxa+tLXy3sT+ugLT5FhztnDuwfLiVh
W+tlU/Rm6MBbv7xcX6SBmV51qSf9oYPg+x+lIpvUsXO5veLyC3SYefWtLkBW
FWs7xm8hvUiHv6Lu2wralbHx8N0xIst0GBHP+n46TgkDl7bPG9gYkG94sJtD
ShHzt2bbso6dAYIb5cUn1xSwkzQKLK5nwIwVRbZ+Rh4bUqq9OLaBAcofqkYM
1+QwfumpNz83MsDX0877vpgcZrBFjfMrDwN2bqHtKzOSxbLnLvm+3sIA9s9z
Fe9MZLD631/PPBdgwNTB1NrCl1LY149Szx8LMeBbukIc9wFJTKv1pFq9GAPq
Q5bmg56LYS513a5VEgxomQrYXXdKFEup5MmtlGJA/G/la9aHRbC+nOTpc9sY
kHBcwjiXJYSxH3uwvUCOAYVN5wV79gpiquFLtifkGdD4bVHv0gEBLN45tD5h
JwMmDRfRRrstWKVV1a8oZQboLFAyvzfxYa+po+Ihqgz4ui38jpkOL6ag5BXj
rcEACR8bykOvjZiVVMkNV00GcJQnYjMi3Fjk5o+f7bUZ4Kg+ZDjdx4U9/2MD
5noMOLuF7zt/Dgc2+yvnCM2AAcP0lrEr8esx6Y/PLxoZMeBe3/cnf2PZseBH
NE51xIBH6yI+CZayYWdq43V3UhkgL3opWDdtjdJ6pclXls6ATnrtzeuDKxTh
HK3ngqYMGHoV6uv6ZZGCJwUt8ZgzQFT7Q0161D+Kb9g1NU5LBmgXSQ/8UVig
NDltz/1rRdQj6/vRueo5Ch/13PSwDQO0ShimZ2NmKR47Bfd+smdAYPQJzofx
05Qavsz6LicGeAT8MnlwcJLC9WedxCM3YvyhQs8xzTHKaKAGB7cXA/C0jY+i
BYcpr365TFr5MuAcM+I6u8UQpc4zs/9UAAM4G4Idjbp/UM59bHjyKZjQdsuX
es9+oyTY/ayWD2PAa6+F7fcYXyne3YLn/aMYIOaz5ZNT20eKuTmk3Y5lwHGf
DPcLFX0U9ceBIQuJDHBwPvjx88BbihBW5IpSGGDoMX4w/+AbykJ9h1lqBgPU
OT9L6uu/poyEurdczWLAm0VLYxe9V5TPpHntzhMMuMO7mc8ns4vSek1+m3A+
4aeKVeJ/5QUl+0L8XNk5BvQqHLMPpT+h2Od/eKFxiQE5ogkzpFsPKWbWh6m2
5QyINp6elPJ+QDHi3dAQcYWYv7VSUSyjmSKbSr7YfJ0BmneOySKFJsrI0dwo
y1oGyEVO1htH1FI+6SpOBNUT9QuRP0XDayjds/e98hsZ8PTJTGiy+B1KbeCI
1Yf7DOhJ0It1WquixHsa7/B9woD/5P+Ly1uppBze+ulc5lOiP4z/FmrEXaF4
fQzhv/WMAWsc7juShSooZnalS386GXD4KNcvkYRLFEHzpdfH3jGgDlunwed1
gXKFdDv+wi8GiNztTLjgnU8JEpn+1zDMAPJ7C+1x8/8o5EVS+OtRwp98jewT
KI/y8HF1AMcU0a8yJ3x8a7MpffbVDv4LDMgLv16z4J5K4Y6r0tLdaAxX2En9
QZIxFL9nN4c6VYxh/9VdMp/LvCjK+69ZrQQaQ2DUd47Ak9qUj+Z379iNEuMV
Vt7ohL816rkUvQuFmoCueohIYNpBo4WaPZTtMyYgV/V7HJdgM1prDKlLDTKF
CbHRnvGs/wwtSSbGsXOm0PHIz/T4f0KGT101DgaEmsGeX48uvI04YyDo5Xev
ONwMpti1dkWhQgM3vzK+V5FmUNJuUr/NqMBgPkToDjnWDE6Xpx6/dTfPQCH9
7+LKcTMQUB8SLX6fapB450F2XqEZbNuwZuthGG5guIFVXXfXDBz13eCLkI1B
Km8G++97ZjC4OeVRqw/L4LVA617JFjMIKN39z6aVaeAnTf4X32oGZjmfK1ti
zQxOa4rTzF6YAbe8ZfK9PDD44zzwpv+TGXz00e0o1FM3AE8JRb6vZvBzVjtJ
Yr+qQZaPTRT6ZgYqvDpBGq+UDLYfaZO+/JOIZ/bM9StuCgZ7UisPBE6YwTmW
y0mzICmD81nfGkqmzGDHOfmN8+/FDX7nSW7qmTEDmqiPdVWCqEFiUfYt3b9m
YJDeslQfImjwsvQJ28F/ZvC86OQcVy2/gVjFqk3RkhlsvPl8/Xl8s8H+63rl
nStmUPCh+wTdk8fgVvXhv2trZrC/XiJvuIPb4H8P/Pqa
        "]]}, 
      {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData["
1:eJwVl3k8lG8XxiUhSyRb9j3kZzdkO4cZS6mUSpYsRfYWZI2YsccMaRNiiBAK
2UVSaKG0CKEoiVKpkKXyPu8/4/P9uOc89znnus6ZR/bICbujrCwsLLrEx///
yqX/vZYnVW2aO/mdtqkpCRo4VaSP+aQD74Dnb6/+JLgXfrNI2ScfcgxdZx/9
SIIuzUBvdp9bwDqRKtymmgwP015Yz3vfBfffWQ2HribDI8O4phnvZyAdfbzb
NSEFHp8bDpzyfgeN7Ndnu91SYUcrx+5J7++wUrPjp7xBOvTyktazubDgOo0t
XicWzoN5ukV7iS0nRszO58X9uQyxO2rLXhznxBesE36d3FnQtk7+/F86Jwo4
fz+zRjwLDKNYvPb1cGL/+T26PtuyQMe3hXvVej167Fz/6GtIFiiQtQ7am3Nh
XaeRx6OvWcD+W+Ibmx4Pvj0TzkUevAJHNZZ5tXj5cWrQ5XHwhRzYOZxULCrF
jwfH3icMF+aAbpKQCYsGP/ZUFETrV+cA2zvNgGd7+PGI2Wj/k94cKGR4Pz52
gR+X7PkkPNlz4d3XV4k3xDci8HIumIfkgmPFrVV5VQGMN8wYgO1XAR1MLnMb
CWD+l6pkHvuroMz2RP2XjQCGSWTueXLkKiw6T7p0HBNAFN01JRV1FS5xS95x
rxbA7l72KxI3r8JLv7PhVw02Ia2SEnmULw92qRz9IWwliCIKnSp9XXmwnBrS
MmoviJ0jGfu5nudB6beEhCIvQdx4L/Q3aTgP2Gqvb9ZOFMTCwhqa9/c8aDad
MtvVKYiHL3e1K4jkg9J+/8w4shAetQq7z+mZDywxgTqzIIwST7gbyb/y4eY4
9W+9rTCKuCytbVvJB2dKZne0mzDK9h/7KcjKhPr1t525Y4Sx5IqIsj8XEwIu
zMUptQmj+IexvHYxJgyVhb06ZCyCUlyNpbyGTKh5FR3yyEAUnXIz98kFM6E0
wfPI++2i+Ff1VVBLKBPySDa2K06iWOTz6qVNJBPOZomq/Bctij5LPQfsqEzw
OHR7JOOeKD77F22wwGCC4MQU2WHHZpRxUyrJKmUC18VnmoHOmzE/yMG7uJwJ
LJb1kmcDNuOFW6+dy24yYaYk7ncLYzNKqmWPXaplQqe/VLn0y824eerzfs52
JoT+2ifwyVkMHVYylij9RD5FhqurAWLYvaf474MBJhw5IDsjekYMp2SLDIzf
MGF3w7fOHUwxfLdFwp7/HRO2nE6JuDkhhhNtZAvbKSZIqZ306p4Xw0Pj54RT
PhP3HbXfN8Yujrm6TYrNM8T9QOE/ARVxFKFvZmX9wYRB1rtjIcfE0aj4Vb/y
EhOe3i7uZZwRR753xo0SK0x44JnWXJIujlMus+85/jKhusvxwlC1OO7+GCTy
gKUAzp6dszJZEMeWLIetrzgKINZoWNeeQwJnijXO0NYXQOjMPdkTohLIEiOy
RZm7AI7sTl9hGkqg8MlvNMcNBWAkoHqLLUYCqzhMc/cLFsDTNU6PetMlsMVg
6UCDUAG4/0j5cIkpgZoz6l0bRQogvm9aRKVDAr8Nvn1RuZk4zyiL3bVOEs/a
RY3SpIjzZ4ayhYUl0Vb289lr0gXw89j6undKktiSmLHmjkwBiOzynQ60lsSd
2uX7X8kR57lV7C6lSuI7CmW4UIk4v+wQ4JYriXPyzuK0LcTzPicnKldKoljP
r22OygVQ9miqufmpJI4psEt9VykA4ybR/rh3kqj7gzJdqUrcp9T6+85ZSXzO
SM/z3ErESyqVf7dRChWHSS+b1Ih4YYMmpXJSOK5V4ODwXwEIe3M6BOpIodRp
7VffCC61NwgypEghI5Jje7Q6UR9Ln7S1B6RQPcOiea0GEV8v63rPUSlMZYpt
pRHsrviw/WKoFFb+vZO3SHA8m/L8liwpvBEVkNOrScSfO8j3o1QKfc7zbVXT
IuJ/SFJpbpJClpryxzSCDV82kOMeS6H2bH70c4J7Oz657ByWwiCrfVai2kT8
GpFwoRkp9IjS3XqQ4J8FVplv/0hhMEezGoPg+HNhFSW80uj377BtK8HC1JKu
k1LSuPSn+tIEwaUnB8a2aUij1QZ9djYdIh93jhVWlEbTSwkF4gQ/tdUX6tkj
jdmG2wK2EuwO3hoXD0tjYM+crw7BP9Uvb3cNksYnWkfy/s/xUt0eW+Kkkd1W
m1eNYOENv6Nnz0sjbVaiWYLgsr9KWU1F0uhaO1a6jmDjr/Y1tDppVJkzH50k
7vN0JLHHpksap27yObf/P7+e+knBAWmcDdqslPn//FomWd5+ksYFq23mhwhO
KBcWL1mURryy+7YUwWm7rok1ssngB2mIHiLqdcCipUSCVwY39i5cSyNYyuSl
LlVIBj1qvbcaEPxJ98u9j5Iy2LeQIjJC9KNKba3tDiWCK5wDwgmOUBAfuaku
g77Px/7jJdhcQsd3k74MLqnJu2cT/eQWtFkIAxlcAW0OGYJfcXvEjVjJYIC6
/JY8Qh/eK5lXix1kMGlc7H0coZ8Lu2fuR7jL4G2fJ//mCb21F1h83uUjg9S6
odzDBItaL5IWwmTQMvSGnyKhT0rOXpfHMTLIyUcpiCb0e/Lbjbi8JBlszJ72
ekbo++EFlz7LyzI4cUyz0o3Q/9yn+gWxfBmUfNWlm0f4Q8aIX/L7dRlUtt3n
+JrwT/h4h+/lehmc/O2WpKNYACrqymun+mVQhZ/2pkC2AOypVJU7ozIowv65
opLwI+3VG9uMjzKYHNphcJvw65tIeq7BvAx+t4DUcklivnT/1EsRlEWLv37U
vYTfv7i3+qjuk0Xlf6tfQviIfGqF0/85yeIny8e80sQ8oXCcrHtxRBaNA/UV
OngKILdSjvV0kCz+3idrukDMo53LSTlPzv0/XkeGMFsBVJ63exrQJ4tfdt/l
MfrNhDeT5XM4KIuKNzrJCfNMYDdcJy40JousHasVj34xwXWswbv1uyySBusU
zWaZsOE/yTUb+ORwgSIo9YWYvye6Punc2iWHGcE/89SHmNCOFf5q9nL4oGR6
bvY1E/hbTl4rc5VDo+hrHRWvmFB1a0mg6IQczt3pHuLvY8LPLO6fWefk0K5p
XWJqF7Ef/DWqaP1yqCV0br9tDROi+MPU7F3k8ZvNlSXdBCb0nDXyfHlUHgvl
N5A1aUyQXMeSu+e4PD5j6S9TjGFC21Iyt02MPD7xoEz8Cyfm/4fsz1Agj10P
t+X7BzAhrq6tVOWjPIqsvXpf247Yf07sin8DFJDF6VBa7mYmmGryLEyfUsBd
Ah9ZFYWZ8GOdQPfrKAUsnzv3uVSACQ7Vkr5VaQpYKh0ndY2bCYqcepUeFQoo
oD8ne385H9rrPPQef1FAdyXVTsH2fFjgv2dx2U8RvYWdKvZR8sGj+7SXlo8S
LjhZ5snr5YGnsdLuhRNKWO08oOCqlgde1X16LWFKGNiZ8uecfB745Cius0hS
Qj9dx/aPG/Pg+Iln1xyuK+FeaSGq6berECkiPx4zoYRc2Z+V7hRfhUzvx85P
3bdgeFuHrRz/VbjHsXmvv6My5uieFwl6lQNaG2MvTZ9SxSen7goJfssCt18m
arsD1PC2bPFbUcFLwMzrlPhNV8e/78ukH7OehxqG4fALO020uKLakq2TAYdz
NqxrttfEteSqmHqVDOAvfa9e4KSJbnIx2wekM+D4vbO0E0c08eB/bZzKPBmg
OvdGhSdIE5ONds/wPk6HQsfT4RbnNLFuV8z7WI10yFS4I9T4TBODNNTV81gZ
ENxssufqTi3c4nwowaonFWqdulmH9mghe6J4ynxTKiws76kTPKCF/5UptdaU
pEK4kadYmosWNjmPv3eKS4WoO2cnIo9rYYB96kEPo1RIbBsId8jQwp4DoiKu
N89CVkdgwaZXWrhAe7LNlJkCQ0dW9tkOamHuGL3uY3oKiK1NYE8d0UKOovP0
qzEpcJWc5c/6UQsdl2ZOmLqlQOGDNr0f81r4J/tJp4V0CpR3cT9+KqKNEsKJ
mScLk6HtcfHPFGdttH5/y8etLgmqRPsCo9208agNU2BjaRJc81qePemhjQMZ
P7KeZydBMqvt94P+2ljSd90yJjYJ9hkuflE8rY2FP+VD6DuTYKpsx8d72dpo
LOi3K+xTImxK+T6wNKSNTudpaxjKicA+sPng11FtjKw09pWWTIRFBcrrsXFt
vPdbcuLuxkR42571qntaG9e/7xBUX0mA0kWz5xeXtJFZqet992kCmPpceKy1
WQdF06Rb68ITwMdqW6uvgw7WsPzLnxmIh6/KmzurD+ngiTOsHBd64yGIa6ln
yV0H7SwPrd11Px5O9zaOpPjq4J3bY9W/bsYDY5/Bn7JIHQzRKbmyKSke6tz0
jT7n6qDm9vb32YbxYGgmQtYu0EF2ljJjJ614aJP7vSOyWAer5lIWVZXj4eHH
eieumzpYtg0TWYTjYcSfFKl6Vwf7GOsSTv+MA9ZwvSa/cR0k0WoVK2/GQZKj
0L2ajzrIMf78fOz1OOAxmn+4PK2DvNyeYkfz4kDoX+3g2Z86KOhW7XyYEQfK
8bqLN9bqovwXBWGlE3GwO0NH/4uiLj5gC/Ic1omDnFKtOn8/XZybdvN69IgG
XUMeD/OP62J2TrJ/330a/OS6NPwySBd7Yi4qfmqlwY5jy2uMT+tiX0lfDrmG
Bsta93fzpOniV8dHnQ05NHBo2T9VUamLh9VakxMDaRA/k7gyVq2La3fxeSUE
0KBKsmmDUL0uZroWx5z3pgFnrKRedJsuvpa8bDXqQoMGyiR11zPivj0ZVko2
NBB+Gib+bVYXtR+GdCUq08B8tUxdbl4X4xPZ6CEKNDiuOWJmv6SLrQIbuIJl
aNCZiT5ta/SwITmSLVuUBqcOrq9jCOgh7VQO6+X1NGAmGz3sENZDrjLdhOV1
NOhpOja8IKaHvlwLoQGsNFCQeLHGTZ74/5/QuNMrVHg5lr1bQ1cPD7t3mVp8
o8K/jb2HPQz0cHzFbJv4FyqokldPXTbWw/oL7xxWP1GBVuyRs0rRw2s7msd/
jFNB209t6tkBPbSb288X85oKGb9aqSfD9FBz/sZRrQ4qHHuRcfjQaT2s0r1j
xNNOhR3VHmbWMXpoXHzlzc9WKqw7sX6NTJIeFnKp2n1ookLk5/2xzy7p4TEv
a/KeGio4PNri3pKth3jzXGRyFRX0SpehJE8PwzTGDHpuUmH2KHP1zHU9vF+m
qRJaToWj41/OqNfrIatKx1e7YiqYt7e5ijXr4ZbZuKDJa1SQyT9nyt6mh01O
c4YJhVR4c0j/32inHr5qfnBqIp8KjUZcbx890sMUXs7+ojwqXBQbba3r1cOt
r9vtT16lwp5BWjS9n6jnL7Fc5Rwq/NdwwCViSA9tDwftFsqmAtclZZOjo3qo
kV6+ynOFCp37nv4x/qiHO1/8NJK8TIVC7YIR5Wk9VNdJrdO7RIXYjafuCH7V
Q25WMW7Hi1QwfLY5amZOD7M/zym1n6eC6M0Z58FFIr8Z5vBagufT7ho9+EPU
i7x2u10mFV74Z4pXsZAw7Y+pV/k5KlTtOLqSw0ZCcb4gVT6C6SoGw0mcJGzz
rkuLzqCCHyd3SzAPCS/9lIhfSKeC9afRbDd+El4ubuCIJFixqyrSRpCEaqnp
GzgJZi2Oc9IXJWFsT1k6k0GFsTh7Q3kJEma2sNPIBLceURHjkyHhjdGCkVk6
FbLN/iwty5Nwy3zgpVKCw2WeDU1uIWEzt+91P4IPrBY0vdhKwtnTp9bqE6z9
9tSVNg0Sxq1EFfESzN9qFXFDh4R9RV6x39Ko8DVHzPGSPgmvsmxkDBH8OPKr
Ac2IhGV8Bx88JbjUsV30OJDQcD+f2P85weD8oiOZeN4wd+IAwUdEvAYtrEjY
YCW2+plgXDBo1LIhYf3A2ihO4nmS/dxZkrYkFA6i/9IgePn227D1+0iIlWGH
DhM8mFl9cN6ehJJDZypzCa4LjNcfdyLuy+E8Ok5w5p6DIr2uJBwRan+vSdTj
pIbq78YjJMypc6lNIXjXhr+vi7xIKBLyznqGYNWvz+oz/Eh48+HMJQeivh9v
hIT6BJHwV6WO4W6iP/sl/70tDSVh7vnrpz8Q/CA90Wo6koTPUuL+xRH9LDx1
WdQvjoSrTJ+sSaL/Ap+kqTeSSBje73i5lNAH1bF0+nMqCZ2ckkpCLlDB3bSp
2f8CCbWSNJ5oEnrrqzKTr8gi4VEn3y4pQo8g/zh1JpeE/TMuhSJZVJDiHD50
rJiEtQ9bn6gQeh55/uff8XoSblLWZDwl/LCTkuB9q5mEG3yMtgkwqdBSz9v3
vY2E/GMbPNwLiP7nSBWc7Cbha9fmNRJFhH+PIjlokOhndj8/3w0qPBx4WF4z
QsI/t+cPFhN+1d+xV/DXGAm33bzbbFFJBWGNIx+Dp0mosXqsoIjw+6vFuKSQ
ZRJe2cV3caiBChR/ntm6fyT02h7ufJeYF7dHLzgssOpjd9DBoZstRD86ilXC
uPWRc5j/0Y27hF/Tup+ES+ijxkK7sNBDKvRIc/NHmerj8iXDvaVvqGCceT78
jrk+PvvHli8/SoVyNonxP5b6uDA0N1jyjgpnp9Vqom318ciO+dHHE4Rfbu/e
H+Ouj7Eylx5EfKfCfcvMLBpNH6+687acYKfBhFdLb2SiPj4aOLADiXnMljTB
GnxWH6fB86sIDw0su0nHPDL1UfReKGVkIw0eWw2bUQr1kcsplrdRkgYvrBW+
rOvQR7hKa60h0eD9jnqTlDUG+Of05ee+x2iw1v9dEHWdAe6N49HlJPaPQipn
acR6A6xMh/0Vp2jg9cRJwG+jASarPCxcF0WDzzarkztkDXAgjbFj5SwNfuy0
zuAxM8DfI+P7pstowGL75n16rAGW6PeUx3+hwcO2A/Kn4g1QvGkgoOo7DTLU
n3s4JBvgKNspr7FfNJDZ8HBCJsMAfx29/mbnHxpgb91kdb4Bzsyw3LDnjYNY
m3OfX7YR90ngWlXQjAMWa+ufIn8N8PiVlYSj4XGwivVrmBHbsDSoQZG8MR6S
RH7vepFkiEoPFbWnjifACSePjt9xRnhdxu6sR3ki8OR/HjNONsJCjqLq01WJ
cOND4Co1zQhvOfnOZ9QlwmRArDHPRSP8LCXWUHM3EVxjrtbLXDfC1isDPi9e
JsLOooEb2x8aIavkxV9RK4mg/M3mfA6PMS5quarYWydBl/bL6jF+Y+R4YanI
visJPMOc+hSFjFEM36bU7E2CfBZf3ipJYyTvWhfF4pwEwpsSkx6oG+Od2D3n
Th5LAjaD9tNf9xhj+NutGnnnkmCMqusJF41xajFfcfNAEigKb2CcvGKMCv4n
3hsNJ4HfjU8NBVeNcUfp/l6nd0nw60U2N9t1Y6RMJW6hf0oCdoU1tx/WG2Py
sNCj+7+T4L+u3jV2g8b440nOWJhIMkRyeed7ipvgy5TP5xb3JcPdPHx0UdoE
G4eU7+YfTAY2HbFfXfIm+NfnhgDZORnozr2WKmom2OHQrXnmSDIwK3S+fTUm
zvN99e86mQxdu1lMwlxNkNXvuDYzLRk2nb/yJqXABIudRC8n3UsGrv5Nz4OK
TXBDQt/e2AfJwCLC6HYuM8H2gOrZkO5kmMmm1f5XbYJmwdyTB3uJeIX+jOft
Jvip4/XqwmAyhNeYmG8eM8H9rHLMou/JxDwZLyuVMsWIm5Ml/WIpUMyvGtGd
Y4qaJ3JFQnxTQH3ScZGNaYocpxpVFvxToL4lJcy8yBTnfP48O3U8Bbq8pkNa
K0zxQFLunF9wCkzdKQ263WqK/0LaDhtFp4Ca75aA/Hem6HnMa11wRgrU3FNw
C5MHlAynjJ+sS4H2IGmLLeWAp2qtffevpECeDFPCZD/i+TwfieeRZ6E1apnF
pw/R7kNe6a11qSBrw/FH/qAZSsk4eT5rJN5fnqmkDr0yw0+LikuvQtIgQ/5e
8fJrMxyzkf4mHpEG/mEO7eJDZtiX/mPkSFQayEknzbuMmmFRVjp1lpYG6ccn
3N5/NMNNwlWv1mekgR9vvu6XBTO0cD83sPVGGsjYCL79I2qOwec2n/kwmgZ/
8soXJcXN8XRFQ73QeBoM/DTfBJLmSFa0uWA5kQaM7EBrqqw5vjvXxlf0OQ1W
pp/WrFM1x5rzS207f6fB6+SUpA1G5qjzPSB9Bz8d0rr+acq4mOPAj3cGhUgH
DJzUknQzR+3LTb/dyHSYE3+qLXbYHM27PLTELelwKPCqruBRc5wK0PuSYkOH
/ySMDTiPEUwStLOyp8PTwAiYjTLHE57zpQb+dOCXnNvVnmuON/c8rL6RSYcH
3cO7W/PMsUnxntbai3QID7pv28w0x2dmBa8PXqbDWHfm3toic4xe98tjPocO
1UFaB0orzDF+y7IrSzEd7B4eP5RxxxzP6Uz47aynA3uwvQu9zRyny7+pHWmk
Q7OkqevZdnPcue2ld3AzHeSCed3jH5gjPjkumdxGh5+SFR7hPeZYXx7rEtFF
h/PB037uI+aYoDc+HdhPBzHLyMB9b80xYKDVUWuADoWi3OGWY+Z46BdH75dB
OtS0qiWoTZjjXaniS3tH6NDHcTJ/8Ys5ru4IL3r3ng4Ob1iuf/lqjj5PBKRC
J4h8Ks5VvP1ujl9V1XdxTNLh+97bTQ9+mSPLD4/izdN02JC78DJjxRwFRkq0
/n6jw6XjSW/i/prjiPDyDp9ZOkiaiY6Hrprjvfdhvb0/6KA2ue3bobVkbFA/
MJU0RwcbzWhOFW4y2itMnWhYosML1g18ErxkHKXW9swt08GpP0+Ij4+M9wKM
rNX+0MEvsl1uXoCMNpVjoSn/6JD8YK3JPTEyerU41q4Q7+f8ly+QayXI+E8u
nXM9GwMu+yruKJEi409VUx3+dQy4vsHqIF2OjCfF8qe4ORigPj7gEqtARrSp
O8zCyYD62z6ewUpkLPjNy/hGcKfD2UBHVTL2VNwbbeBiwM6t4uE71cjY9O7V
90xuBrz6W34G1MlopJqT6c3DgInC3lRFbTKqT6r4/OVlAOtX/us/tpHRzUXZ
+w0/A87eLaiYMCKjlq27AHUjAzZmat8eMCHjQL0Vt6wAA2T097e3mpHRek98
585NDChd/7GrikzGRxtKQwcJ1hwJ6b1mQcY7TNEDLoIMAOrlNynbyfj4J0ek
nRADuvYpj0fZkLGvqbmqg+DdSk2fTuwiY2Gx3PxWYQa8Xtz+7YgtGRPPRAKD
YNcnb+YO7CXjWk+u5GmCJ6/6r1jvI2Pcty3dJiIMOHbyzxrjA2R8a0uaP0vw
nDmdU+MgGZmnrnM9JzhKSIpPzpGMEgq/V/lEGdBbvd4JnMlosmKns5Ngqd3z
RYdcyGh42uJnDMHHP499j3AjYzB/sE45wXcTewwvHyajPt+Fr70E88s3JtR6
kFHywymRKYLd717re36UjIMmCyVLBFc7p4t/9yZjvyXvJdbNRH0XI714/Ijv
P7o/+H+2u+BVrRJARtsjBt7LxPlrmnZ/LI+T8datPINpgud6TKw8T5KxMgoo
zwim+KpkUoPIGPQ9nFpB8MV1QqN5p8h4pr7tUyzBkwUsyndCyZism338//mQ
TGeChsLJuLPyBu//8016M9C6EElG78DiOw+JegyG3ucUjCZj2nr74AiClTfd
2qcVQ0aZI3kqsgRH3MrO200l49/50IG7RL0f2yRO+8eR8fbit1MHCBabCtRN
SSDjBqra8jjRP/94l5jrSWT0rAlwO0owT6uu0HgqGRf6Xcr3EP13cZRx/0cn
Y+29v7RGQh8357nLxTPISMk+IyFCsK36B7S/QMYxHfbwRkJvzMdPU4MvkTGn
vHnrCqHHWa/m1xlZZFR6Uh6vS3Bm/rmAJ7lE/R3KuVI3MOCDUXTDVB7hF6Gt
qqWEnnUHfVjZC8hodfTxyxZC7/38mIXFZHRqPFTeRfhDqXLrB5cSMrbvSulp
Xc+A0O0i6qfLyDg+Zu1aTvhJlPbtfl0lEa+cp8WXnQG+Um82vLxFxoOqIpGG
hD+bmzsdZ6vJyBp579wawr/Ov3K/q9YT/Y6VqQ1aw4A8TxtxZhsZNz1eUh1b
IeYRi75XazsZhX1MBT2IeYFX5arfdBB+UVLdOrJIh/H+JUuhbjKqFIY/rZqn
g4JVadDZZ2SM7gj1+UDMq1MfzreWPCfjzet3jES+0qEzJoaz8yUZWyNCRc2+
0MGr0T5vdYCMgSSjt6Gf6FCmsu7xqTFCb2cmNf3eEfNKwmzl2Hsy8u55bRI0
Soc/fNFq3hOEX5pfxgUO02H3whzDcYrwf+ODqgPEPJ7rmNhnOktGDvtJm9qn
xH0PPRjlYKHg4ZL25octxHyzZeFbw0rB/86o7yc3EfPd3BiX11KQZj7OUUfs
i0nl2sIZDgre8A9siq4m9t/8Ne/nfBSUOVSjUnSdDoOMuB/Z0hRUN16toKTT
gZV2V+6CLAVd46kMzTQ6bA1Z2UeXp2DaTXbaphQ6nHEOro/ZQsE/yqrMNhpR
H2WP054aFJw0sussC6HDiXvm69SBgkvZFUdeORL7am7N5nuuFDymGSmTIE6H
xaosxoQ7BcV5Qv1XhOnw5ZgGG6cHBXey9YV5CxD75dOh77u9Kfgx/8aEzHo6
ZA83dI6coODK9y2JmxfSQP3+saDFWArGpFRxKD1NA/vMoSca1yhosI9tx8vQ
NLC2PWm2r5iC6ctRvdyBaWDEw9EQWkLBiVqJXkN/4vdFom5hazkFB8/8cIty
S4PPEenhNrUU7O/krGVYpcGZwxaK3p0UPM19Iei3UBqUaFafyftEQUtbUtvm
ilQ4LvRjqWGaglpZ0ir7ilNBd1kz5PkXCr5I60uJz0uF9vtV/myzFKSGHLV/
lpEKg/ZVDn6LRP2jJSzZQ1KBM/qWNmm9BYp1rdm01jgVfB5VTvaqWuCBoTOb
Uh6cBZUjN3b/PWaBWuUt/gkdKTC8vanmwBcLDMrNPyVQkwQvrkX+B8GWqDXZ
/1bONQEWb+81lvtpiTmZImsbtxPvF41BdYnHrZD0fudJiSAqsS8tLaLmrZDZ
4Gmg7RMD3S4avv7B1th1Sag8Kj0KBDx8Wq6GWGOUypmjx+OiwNWngLcvzBoX
y/KKPMOiYCFoU41ulDWG+Awed3WLAoXk38t/463R8Ou7IwkaURBbczct45I1
Xsi8YJzZdxoMOfZU1TVZo+vkgx06QqchkSeFdarFGl2mp05cXH8anm/s2C/W
Zo2jSj0cy38jwUdCd+lMhzVa73+2+/FkJFzWEjW3fmKN58RZQhIaI2HOeezl
mxHieYXzsg6HIgEPb1bifWeNlK8HZob2REKql104jFvjr6lXqi4WkSAX+ECi
6KM11kmHdHmrR8LexNKjx75Z4xbf4SepLJGQmzrekD9rjb487mdF5iNgKkOM
68VPa+z0tCMXTUdAbE7aTdJva0Qmm2/7iwjoYXay+C5Z49KyfqNtdwSIXP9n
l7NijaV17V3vWiLgSLl+ce9fa9QJ5k48WRUBN6tO/l5dtcaXg1c+rSmOgP8B
z8XakA==
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     PlotRange->{{0, 50}, {0., 0.03359376247781006}},
     PlotRangeClipping->True,
     PlotRangePadding->{
       Scaled[0.02], 
       Scaled[0.02]}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{0.9511758737626219, 0.04518992728438631}, \
{1.7511758737626217`, 0.6451899272843864}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{0.9011758737626219, 0.09518992728438636}, \
{1.7011758737626217`, 0.6951899272843863}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {Hue[0.9060679774997897, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 0.08}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"pdiff\"\>", {1.2100000000000002`, 0.58}, {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {Hue[0.67, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 1.24}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"psame\"\>", {1.2100000000000002`, 1.74}, {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->0.7500000000000001,
          FormatType->TraditionalForm,
          
          PlotRange->{{-0.1, 3.26}, {-0.1, 
           2.42}}], {0.9011758737626219, 0.09518992728438636}, {
         Left, Bottom}, {0.8, 0.6000000000000001}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->{729.1666666666666, Automatic},
  PlotRange->All]], "Input",
 CellChangeTimes->{{3.50442790440625*^9, 3.504427909046875*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwVl3k8VV8XxiWkUOZZEckUF9d8z9nrDuYuNyLzECFCmTNLZuEnaZBQkUbK
mKKSpAEllTSppMxTJON73r/O5/mcffZe67uetfc+cvuDbQ6ws7GxXV7Pxvb/
5/bclUsXtt7GX2yxrl/3IgU1cCtvC/TLRV1R1fs1B1PQo6hbl5X8StBl99N9
+EoKaicd8eXyq0L+Df01U+qpqCO7x2zO9wH668LtW5KXip4ZJt8d8+1G1S0q
ERW709B1ilC8TtUrFMZ6RDvklYamP3qXhF17jVh17Ne5otNQvCT395nSN6h5
h7BmQ0UaOn3aynfyxHs0qxN+dmElDT3/7+OR375fEQdnDiXnUjpKP1P47KTm
AJKMv5/t2ZCO1PyQk3bVAIp4Nndv3Yt0FLLhv5iQa9/QUNJJjivT6WjVmNwy
VfoDjVUpth6lZCDxx9H08RO/EC1h1XHkaQa6ly/fm83zG608eFXg0peB3Pa/
9FbL+I0WLz1oPfU7A11etzU14PgwahwJe+zMnYk04VHHcPQo2vHugpu6cSay
aN5gNeQ7iY7qFZPqaoj3a/vnRKcmkSTlaEfqo0yULeveJU+ZQpryEh383Zko
bH9T+N62KbRX13EnczgTMYYOt9X1TiNt8Tu79ktmIf20reJd4jPo/Cvt+ukd
WUhN6WXAkMsMOidsYaqvmYWE/HcKif2cQVTjG3wjJlno+/hnz6i5WSS22aLk
c1AWepeTVZdn8AcFh7O/2B6VhZ5rGGy8GvcHiTi4em1NykJ3jhRUf+CcQ+Wm
x57o52ehCkEax4z5HPrXk5O971wWOlczuW9Tzhxan9jcpHYxCyXNWawZis6j
78w238XqLBRWuGBj6zSPRoRKlmYaspCfXkVFwIV5pGx/TvZiSxZiHV1ndV7x
L+o6t91P4UUWYkhWldX6/0WXY9Y3/H1F5HfPZe7lrb8oTebyZNK7LCS70nB+
RXcBiQfTCu8NZCHhCwemRGIW0OdeV9OAn1mIGwkx1B8soKg4f7+e4Sy0/PXh
aZP1/9C+yEm56fEsNJkYNOpm+g/5/9UueTpN8JCTRpFZ/9D4c4PN9nMEj9Zn
+bnd/5BYSUPJ+QWCh1fk0BWhRbR1m1Ba0VIWauHYYfhw3yI6MuK0aLNK8Cnv
OdFXtIjO7getx2zZqMIk8dvU10WUYiPgP8aejc792qWzUWEJ3Q6+/bWLIxvl
pH9Ml/NbQrz1J9/4c2WjY8oZnwxuLKHAkpr0hxuyUcRzXZLN1BLy1sthvOLO
Rv4Bg8n+5GWUyStlfW5jNnLlzX9/LGoZZa+1zWzdlI1YN5Fq0f1l9Gx6f6wb
oRlW4/E1bCvIyJZk5Eho/clzPS8YKyjrvyeJWwitlmemOJi+gm748ZclEfPJ
as4fXX65gsREd89UEesJ91zqFBZYRczgfy/PEfFwh+6R22W3isY+vcuiEfEu
C62FGZ9dRUuGfVlXiHymam90uH5eRRElW9WeE/kO2jlJR8itobYNU53XCB59
8xsO5xxYQwcnbvWaE7xenK57XHF1DXU+e11+5f889b3EHoyvoeSw/so2gveH
Q+l1o+JscCeRaVpG1KOTT3cjhysbhK934yqayEI9loJnumLZ4FlEcO/ySBbq
y5hQPHueDc5vKl/Y+SsLDXJeYah/YoMw2dGmj1+y0Ag9+c3CEhuUbZASP9Cf
haaS3Pc/lloHP96Wmt99S/hjRSzRwXkdGNi51j8m/MdO+bNZPmYdcGgK3otu
J/wU/ap4/Nw64OTk3bn6kOin+fR7x/rXwTVz8bcBdVlIZeLf/A1Hdqi4GaI6
UZSFSGrvUiKPssNadfl64VNZSNf/jjDtLDvczc0u3ZiThWhD/lrv+9hh2nZk
5EBCFnL88jFwncN6CFgVNp10z0LpXc2DdvYcsKKhxXNDPAvl8J4LlY3ggLSj
yq0cW7JQgUUE++gpDjgxXnCFzJmFStrVZRPfckDXZYMpqelMVN9S4nxtLydM
peC6ok8z0c9bST2rNlwQwyv2S+lQJhoZc/V8FsIFVs8f9mt4ZKIpFcOpk/lc
8LmdPi+yNxMtV8zwKfdwQZLVrxtJRplIuMTL3HbPBrB3j9r3k9jPaLnGD69Y
c0PxJbYm6wsZKNGi9mpPEDfwnjWpe5GXgVo45U+unOAGy0ruSY3kDGQYy+Zj
+5IbTGv6OGt8M5D2wXs8a2Yb4cSWMzy3NTKQAl1znz1tE1QbvBubu5eOuP5K
T3Do8MLYAyWTjx1p6IDGIp8mHz88ShP24X+ZgnZ/TCsX38oP67jsSu43pSBy
mgjGpsEPAfPHDQ5dTUEcX0mHuln8cIrpqPM+NQVdzPF9HljADwVpwqm/qCno
63hv6jUpAcje2GZmevc4crxRtSavIgiamfHaQVXJCByw0zxGgvDbOdDfsCQZ
KXG8UJ+1FARflcEm4dxktOA85NoaKAjhGW8r/wQlo0IemfsetwVBYVYz1E8j
Gb3xz4wq1heCU18EnPbUHENM5QPToqbCMBFe5RzSkYQWs8LvfbYXBhXWP027
e0mociIl5bKPMFAtltTMbyUhjtoKCa1UYdju/P6rd0ESasJ/U5lPhIE81rgr
0DMJKe4NyE+mi0DK7Z27ulYTEVvCEe0pJAqfLkoK8pgmolvfklbqrUWhFtvH
UKIkImdG/tM4d1GwYOs+vE8zEdVvrHHmSRCFQ2GpxaNSiehQwZ9kxRZRaLTX
e9T7IwF9uBrZ60IRA19LhtBhWgK60xsX/kxfHDRSih+ZScSjyhTv/d/NxeHQ
ar2OA1c8uqBrab3kJA6yD/d/zZ6NQ5lnxJV3xYlDZ319i3dXHPJyqfmU90gc
9uEHOttT4pDw4G+6g4UEePDGdfIvxaKIWVvBX86SoP3mXpnXSgw6dNlwbe2Q
JEg6zm2PnYhB++3kxsTjJYHsPzt762sMsmqYeGJRKgk5j2ZHPVtj0M6YjKO3
BiXhuEn39+n0GNTH/mAgPFAK1C6cfu4qGYOMBFWqOBKkoTz6+64wy2jUtc7p
WWeuNGznKuuloWjkMZ3xo7BUGl4GFk3JaEej46+GxZRbpaEx6/T0X0lifM7V
RCanDBj0ndhIGj2KPHiUbQqzZGBbr7WT44mj6DiH0tzOM1vhQgP8mX4bhXyX
8ovLHWTBM3el5vWBSBTc/ku7irkdrjt9ibbyDkOZTlw7Vg4pgJFeB1fi5cPI
62mMj6afIrhzOOQGefgjb4qi1XywIliaLLP/NPFHPrdf6dyLVITPermf/Hf5
I7+iHZzGaYqwlPBsR/niQRQU3H3JoUIRSqY9L707dRBFi8l/SxhUBKnwpIOo
2w/l+z537vLYCVrVFl0nrXzRow0SewIclWBTslXzjURvNHRJ3eKDpxLAreKT
6Qe9ES8w6Kb+SoBJcu+JsvFGDlHBOvIxSiB1QsXtpII3mvz9ROLjeSWQTvj9
qP6ZF5J5HvLdYkAJTItssWtiXuho9stQFV9lcLGbU1l95IkuKH0/dCZYGYJf
5hgxbnqitra/B7iilCH3Rxp78RlPxL+y3eF7ujKM3Js7mRrsia4EHqWcu6YM
b6sr/+hv9URvrRQ5N00og3qwNJ9IggfSFEgsHA5TgR/+z1ekit1QE/d7paex
KvBVW0CmMdoN0djU710+rgIlmxOkwxzc0N7Jj1/dC1SAtaus01LYDUV06im/
q1EB4a6fhdEnXNH9jMl7rTMq8J9j2OVPKS7IjN39W9FhVaiS/Ny+IdcJvf5X
F3o0ShU+by2IrznshJymebn2JarCLv0LTYk2TihgoElFME8VomtbRBNFnVBO
i2hYepUqmG/b3ydc6oh6o7u4widU4Xfl/f+u33VA7rOYmtUhNRjlq+A33bAP
8QqyveoNU4Nk8u8NSqP2qInUGuocpwZDJZ67yd32SDjI5J5fjhqwrsrv7T5t
jzp+W1kkV6tBBet7kpCqPSJ9cfdr/KMGJQEsmHO0Q5+X5XjRihowbJ/cPA92
KFNqsOoJ5y5Y+ifffGSnHRp08PvbI7oLVDzNWeVze9GZN4dTx/V3QUy7uLRu
wV7E9izp8va4XdA6m3pKqt8W3fxFN7uasgt2tNB5bz62RU5cXGMaObsANA00
gm7aolp6pjZWsgvMtv8YTkiyRX4t+a37Hu0C4fl4mUFVW/Sq5tJANqc6/NFI
jWjLsEFxPQeOC21Wh00GHk4uETZIZXqn0jlRdTDMc7bb4WWDjqvfCL6yUx0K
SW5dFpgN0r9au/rIXB3e6Pqb/pzdg0ovPJH+e0IdZql5Ex7+e1CRi9p7u0J1
yG8h+Ts77UGFkif/q72gDtuqVmpSLPag7EIPrpAqdRh0ELx1UHUPispZmhx7
pQ7aaZWDQZMstCde8/F3IQ1o4Dsk6JfIQrspZ+Ko0hoA69yaXUJZyGxxVa9U
QQMu+fhUJvqwEB7x8oarjgYkLvP8sWOykEqQb2GfvQZI3U0UJcuwELtb8cGu
sxpweGNEOyvLGq1IcSjsuqgBE0ei3vFEWqOFD/5fsq5pwA3GCsd2L2s0Yadv
a35PA1Y1+QrcKNboI/MNpe2TBgzdXf9+y6wVesdj+Hf7Tw14tVnQrOibFep5
Vno7aVwDbm8RME94ZYU6jIMU0aoGyMRFpVtXWaH+Cxzcn7eQ4M9FqjvXESvU
t6J3gFeYBC7vOVst91uhty4BrUbiJHjtu69wyNYKvZLsiT0nSwKFkc0fJfWt
UHthyfQ+TRJIfHC3OcJhhdrmeqzSdEhw9pNFl90CEz3ay3Wj3oAEab/UhLPH
mOi+YKCPCI0E53/prx97y0R3cgw/9tiQYGw1XjHgBhN5Fm3mbLInQYTiC47Q
S0zEX/ldvcyJBGw57kdazjFR0KPMY8H7SfCu9q/y1kwmkulyu2HvQwLxnb+y
NY8x0ct+rXeYPwlynq9dT41mIpU//cq8ISSwNxXG/wQw0Qe2KtvZcBJctzzV
zHOAidL5kuP6j5LgtNBeQS83JhpSVH1dmUQCEVMO0+49THRKe20xN4UE23ka
lX9YMhED3ihEZpCAqWDwi2zCRBcdY6KM/yNBqtTx0VwjJtrjY31R7RQJZiOX
VM/oMhFbqPxLobMkKCiuMPykyURu2S+2fS8lQU2q+TURZSbiO1ti/uwyCUKt
/lveuIPgUx4aWl1JgoWhxjU9OSaSfCD1NL6aBLVjl6ZwSSZ69mJy6kAtweOx
RIeoGBNF9T2WZDaSYFftgLyiMBPt/HmaQb5PgiSbixGHBJjo3XRAkNRDEqAW
ba3hzUyUsorOsLeR4OGW80+LeJmIzCPcOvyUBJu7JK8kb2KiH2K/R1+9IMHw
YXUo5WaifIX7Io3dJLhJXGqnuZiIqpmHSt4Q9bY+7BjOyURTmPfB1Pck+Gkv
UKfGwUQlFvonAz+SoF7JMEl0PRNZ7eNt3vuVBIxVLhUtdiZa8RoYMvpBgrof
i5IJ65joxuFafvlfJGiJ4XqwzMZEznHphptGSeD1IifxGqE3Zbp4T0+QQJU3
7Fkaoe8WknL6Zkhw67j4+gJC+13iaHwwT4J7Pr6FXYQWq+77VrFI6DsfR3WJ
+dvv3+DJWSXB3m1pAS8JHf4sUSecXRMiOCXicoh4FN7tdXfh0gQX659psUS8
b74rZdA3acIn/9GZU0Q+xyaX76hs1oRy7LNCP5Gv5vKrTwKCxPdSisfNNjDR
AHc51z8RTYhpno4YIHjlihwlDUhowgZDba8ygie+nen0VEYTupev38okeI+r
yx2/JacJqi0zLUVEPc4bzd08tUMTgo5G/3vDz0SLe4vXee/ShNDe3GMNIkx0
1fOIqqWmJtw3yy3yFGcihyBjOy0dTVg2ehRKkmKi+rTxSjZME7K3e88bEH4J
bcJYxbs1Yf09NodRdSaqdXrK/oGlCekjBjIrWkw0v8iqE7bThC3SD9zIeoR/
jLwls101oW/8sjE/MFHs/czB6CBNMK+2AT9bJmp2ET5dH6IJOwTOJuc5MNHq
crH5TIQmhM99VO1zZaIk7PatgwmaoG4fe7XVj4lSW95HOeRpguX76iOTCUz0
1M1TtaBAE679C5teSWEi7rWRz91nCN4Gq4M7spkoE63STMs0oa5WGH9whuD3
UIFP944mXPxnk72+honOtB4pE+rVBD6PuWvkUaJ/9y/ZWvcRPDitNVJmiP5Y
n8KV9UkTdsKW1R//mKiYfiaA/acm5PFZfXzGbYUutrXoTM9pgp1VRJrCTit0
vZ3neZeYFghtlpfIPGCFWp6Xz2Q4a0HWxqovfD+tULX4qyNx7lpw6hafWtSY
Fbrkszh12EsLtpw0tPpK7K/p7NaT+wK0QD9/tOgiuzWyNVwY3RGjBemBmZGz
26zR76sWPx+d04KgLflloY7E/vw3zLvughYcWX/R/5iHNeoyLvlReVELPtV1
vUv3tUY132a/5V7Tgo9Ss7Ex4dYoXqL4i2uTFkwrX82eyrNGQhmT7/990AJ3
gby870+sEdd7iX3jn7Xgou6v7cyXxPmgwHg38E0LxiZF0q73WKMvD8/0Ph3W
gitwcZX21RpVLlBfn/qnBZF3tY+//2uNcL+C55oS2mA4/KNfX4iFSPUt5jtk
tMH9ha8DuygLyXMMd4jLacN5M4uoNnEW4i7Fnq4paYOxe46n1lYWevN+6HGn
vjYkKTHNapRYyM/UoPmggzbEDt5OwCksNK4k8eS2izbckUv4ch9noZBN/17+
89AGoQG5u5pUForpbPyUcVAbtkdcbVo1ZqEcW/3lq9HaYP5JZ0nBmoWEdMQ5
ZuK14UrfKtjvYaEzogs8hsna0CmOtcbZstDFDw1Sz7O0Yd6n2KNqHwvVuesZ
jZzXBuo154zz7ixkSBWja5Vpw/TfVvkETxZq2f7XIrpcG0Z8zfv2ebFQx896
p023tEF5bTx1lDifPwXoRqs80IZu5abXRYEs5MkUPRbyWBvIzsECGsEsNKQ+
n9H0VBtMnEb2Nx5mocnpurMWr7TB7YMSdpM479mjdO76fyPykeUd23aUhdIc
RR7d+akNj35vfOsVzUK8RnMdi8PaUMNW3F8cw0Iiq7V9mTPawKHtZ/wnjoXO
fS0Y6Jkn+DQLVvMnsNDWR2G/JZe04Ze/Fk2euF8oHScvXFtPho1td4ZVjrHQ
zQPCbLMbyBATOMopm8xCWqZ/NhjxkiEgmrGP5zgLGW2qFXshTIY38kWVbSks
9HD05DYhCTKIZWVW56eyEKMzdKezDBluJR9dsU9jIas8bb3RHWSgCAREtqYT
9T0ihLRVyFD3VOvmwQwWcrCdNYlRJ0MLI9FgQybBi/zG6rEWGT7c+yVbRGhP
0Rp7Hj0yyLTw+e3IInj9zXezNSKDrUu5UAWh/T+E+BQhMuyxC1KSySb4NdkE
/aCTYdZa+3omocPOa0WompGhSq6jdILQ/+IE40N3k+GrLPdm8xMsFO8+k3KP
RYZTyb1/zxJ6PbXnxHo7MlQ8F/T6Ruj07XdOWTqS4ZX+9b3bcliIjyO/+KQr
GbLt017bEjr/55Hyj55kmEnK+xJPaNGne27K+5BBNOtWYimhiyo16wL8ydDs
0n6/kdDtH7w6SoKI8eeGfZ8SemZT4cc3IWR4L6nA10norZSOiQ2RRPxe3Lef
EdoicHEdJYYMjp1yDs2EjrigJnI4gYg/ZparktAXu92ULieTIS7g76MMQnex
/WfUl0bwTi4+sZ/Qi5qPrXizycCstQjSIrSi15wn5JHhkLyD3z8iP5uCneFh
BWRQcRVMbPg/jyeO6ZVnyNBa0Hj3EKGvzmcVfTpPBvXxGAkJQvfubLnFX0aG
sZfxl+4TPNkcpx4xysnwwqjXeR+hHe7t/X3jJhl+p4b4hhD1OT6WujRwmwx/
QnNbZ4h6Vsvc3SxSTybuQxXO/oTmTpTRiWshwwGLCntE+IF829rsdisZ+E72
PjhP+MXje5Lzz3YynEUp4dOEnxoYQ0nMbjI8PqXQm0j47Xu4+KmkN2QoP9yc
fI/w4+YrFpV178kwfUXtxDjhV5+NVV0yA2RY+sXZpEf4WbQrUmpiilhfPrzL
m+gH2tpV9e1zZDCe3VbqFM9CQaRPVPt/ZNCYjftuSvTPk3zwa1mnAyYH8Mfc
RH+F7dtYlyOoA7eZ/ToKESxUmm7U0SqqAyc/NnS9DWOhl3cDP85L6gB3jORI
PNG/CtI969zldWBd93BVA9HfbwbOWWmQdeDyhEjlY38WWhXo9PTS14Ea2JCq
eZC4v9PXwk5TdMC7vGK20JeFjpV7Fa0xdIAz2iTZzJvoR3+13912OkDy315o
4spCebPNSYcjdUA8tzuoirj/B/bkebrE6MCZwX9b7lkS/rntRTVL0AGbGRef
B+YsxBm8cZ1smg68Qx3kO8T+GD2yN7G7UAc2fhrzBoyFDnwbjVev14HqVIWA
NRWCz8MWN8kmHYiK8MsvJPZj2ZL/cK4WHaAJbA1XVGShfhe91c9PdGDeRSOI
JMdCrL5jcSfe6sBdM3P9cWK/N+yWiB37owN2e3jiNq1jIfFbY859CzpQnr3M
47xsjeayHxi1LeuAW8imsvx5a1RtcWCpiEMX/CovOrwbsUY72qujLYV1weSO
qnQ1cf7wN5sevaatC24TcptvlVijn9fCI/xCdAFYJSpf1a3RXpnVL5URusA6
mH2uTtEateWmmg5H60LEzIhxzFZrdDHstLh/si6k2Iy59PJZIw/8blNAgS5Y
ST2ebh61Qp9eL68G1esCF8frbSGXrVDvQnJa+KIunJGQ/xS70QoxAnin6lZ1
webZ1uu0NSaq+VzgMM+uB52tV2HhD3GfbS1XjuTRg8V1LT1aA0zEyn76Ikpa
DzwF0iWG6oj/h208/LG4Hux65WxnTvwPPDbJP3PsmB5ckdY9JHdpNxr0udcZ
naoH/YFlvY2ndyOOtEH20Ew9kP4Wf4KWvRuZPNUN9MrXg6Q2w0W18N3ouelH
KuOiHtxc/rLqarIb9ZgpjHK26sFg5R5frSFL9N2iHstYpw+xLW3FN6UsEZt1
//fcRH1YZ/thw7irOeposZMPO64Plqsviv2szVGe+msvh3R9ELvwk/s9mCPZ
zR2Dsnn6INg/7pAtb46gs27odok+GBS9bHL4bYYSLf8bedOiD7a0/45FBpsh
NjOzGbEVfdi0y9/2WagpWoP6daVHDaCTvJghZ2eM0sT+MnvSDKFapMr8wTZA
wU5erX+TjWDbh2f3PKZ0EG/JyAAl3QjuKqbdHG7TQdd+HFlLyjaCA3YOrIyz
OmjoUCKF95QRVHQ+37yFroPcEorrZSuM4EWKoKTxaTLaffn9NfMOI0B91x99
YWgjpQnLk0W8FJBmi+5taCShdq03twf4KdCiUZug9R8JeUc6vdohQgHeiZ7Y
twdJqITtIF+1DAVkuk/YFkqRkKhQalqbOgVUDl39JMuugTj0H8aMsyjAdfsO
R36lGhpIInujUxQQcvIY4MOU0A7RzTmHz1LgNTfX2MjiTuR/7VdDWTEF+sOF
Hqvd3Ylme87xcFRQgKbf3TSguxNxKayr6ainAH3ii42oniLa1d65zqaPAl/3
kXu3WCqgEKcrqsmfKGCd9Ou3/xYFVD+RaFc7QIEPbxeqSb3yCMTIV0WHKRC7
nMFacZNHe/3OsT7+owBPAaoqPbodRW/yLfGWwkDz4bYqrcey6MEFeHZqGwYL
YoJzzBxZxKEtOdsuj0H67mDBd46y6IRzp4myGgbv35U1Og5uQ6U3tCfGKcT3
X+gWv623onYrNizSDYPm9buna6ylkNDJs/0ZZRiEujbsrJ0UQZveCr0OKcfg
TryJ1ly5CGITy3nqfBWDiuOLFsMuImjs3LHaXbcxaBxI1f39Uhi1XwzIef0Q
g77Nm4U16oRQ1B2MJjGAQWamvJlJhQAK+tOgzz6IwdGGm5W+vgLIW1dLY/QX
BnwB/K0kZQG0p0lRunkSg7fLZR/rb/EjldYt8x5rGGgHygfNH9tC9PO3q5Vb
cfBWpLtTN/GiHiGX0v+243Be4n3NjVIe1GH3rjBaEQflG4+lLPV5UN2H58m7
1XHIff4kUiJgE8r5VuM6heFwmNL45ckXbgTTKQL6rjiozT5xLlnmRLrabNxy
njgoVr3lsC7nRGrh0asbD+DwdudEtYA1J5L4FzT68RAOvFJx95+Wc6AZNocn
CbE43Bm/MnPPfT0q51c5+rQIh/zEL0mj69ch9SHHBY5SHHp3p+3uq2dD9fcy
ImmXcTj2/kn8gD8bavcZDm++gYM4w/zQ4Rtr+O/7lSE1zTg8ZJdMOhK6gh/O
75ueeoTDfSsp7YMjy/g/X+4j6u04nNiRq3fIaxnfJOQXfLULh6+RPKfinZdw
tYM7D5V8xYHOPXIf8/qH1+L7Rj/9IPK1juX/N7yAY8Jp/pK/cZC6p9pUELKA
Wz0Y8js1hQPXfbs3+zL+4sEiFQey1iEwb+j3P/pyDr/zSME9krCl0JXDasWX
Z3DD03u/1O5EoJK59eeIyQz++NBx1xlVBJ5+evvaR6bxXrFB50AyggZ2jdOC
etP4fOAlBy9jBCf2KryeaJ3E4+lv3pcS286olSVuu20S3yCxft8XJgLpDGvX
lPgJXLxtv52jPYIWXP6vmvE4biC53cbaF4HeM1e5lJkRvHVyz+vsAASGZxt1
bLxHcIsnSaznwQjuGx4zutQ3jDsd/mZlHIUgTHVr8s2O33hse6mlUQYCM3zf
08AnQ/jDkG3GO68jWEfB6zVUfuCLc5N50lUIEsP1jms9/Y6Tjz78JFCDYMMN
520zB77jlQmeYctNCOKkPPJzKr/hedmXLr1+juCbZkxsLnUAf74lbLK9C0Fx
W+e9wvdfcY6TDKP7PQiCH984rKjxFY86+7Onoh/Bvi2JAu6/PuPuFTvZY0cQ
yPI9cJ6L/oifUV5gHplAYLFZd9PYUD/ec6PjrM8MAqsr9qGldv24Sc1BzT2L
CCT29eWIGX3AxQbsSEKcAA+krIUkdrzH18ZOu/8WBthCnGfnDr3Bz6sncv4Q
BbCaiGC/tNaD6x/2u/5ZHCDD7nHW84IePGRW/2+PNMB9Cz7ZvU9e40P/PuQ0
KwBs+KXX74q/wpONWsmNigDP3EcaP7R247Jx1/rvKAEUXrHNusnbjTuxxShW
qgFMih5T173eiXdxSbfkkwFenGhRFxZ8gQeYcXifII7vg8aff+4Me45zZ45t
JI4fEPMQ/Bv+4RlO42u2i6MAXBLIt0y72YHXC7mN+zIALP4ZPP1ztB2/IFsq
je0FeMqhQWKeacU3Z2p27LIHOPBo2f+9ciueMNsautUBQHnBZepO8yPco/3n
8zVnAEtbz7NaYw/x7YdUj7Z6EfltqGJ3bW/B89/eV6g5AODkvVVAn7cFX4+s
Xl3yBWiSf/WR374ZHxQ4sjMlAKBzXJ4neO4eXtFQ/9Y0FMDHIYrzncddXFTO
LEk/HKC/34vnVFsjnpb5QU05EgCefJd7qNqI+7kuJ2+KAeiljnGIcTTgKutp
Wp3HAAwNbrFW+2txoiafm48D8Cw4Fdo41OI877wzbqUS8fI0fszvq8HHKtMG
cjMB+Byl4fy3O/gtq84cm3wAY9FaaZrwbXxro5shvQDgrUahifeVajxXbuqn
diFAmk6FPztWjR/+I4iJnAMQHSuTWP1yC9c65zD6vgwgpEpA2HDgOn5x/Uhh
xyUAD1HR8CTV67hQYAztbjnATITa85Xoa/gfdOHsuasA5oaWL4wUr+L1P3+Y
ut4GsOv/2nT4egWuaB0+y6wB2Btfc5BNtAI/3chVgtcBnB5WVJI+Xo5HZSnP
b7sLUNwZkHLN/zJuqBl8+ftDgM86Pv4S7hfxa+fYWG9aAb69OH915UcZLsWR
v/S4DUDxmaDPp4AyfPldrU15B0B3bPSQyfFSvDl2kc3vFcDv3IB1cjeK8fmq
oaljPQBySfRi0dfncdKPnoHiXoBMlsjnoaUi/LL59Ydv+gC+PtyWmLr/HJ4p
6pKIvgEofOfP+Bt8Gm8zNzvs9AMgWcv30/SDQnwlluwR/hMgeFivqlG4ED/8
gxeuDwPckj1jpvWyALevbl4TnQGYO9965EpwPp734+qk5h8Ak/y9G998/w9/
Jlr4dfc8wPpCm3e/Hf/DKXFBD44tEvkVHDkdaJuHb7fYljDBTgXdyIY9/t+z
cZc4nuCNnFToy+Jz2MKejZ+q/uumsIEK+2wjm7coZeHcYq9wJx4qFGXkyUan
ZuCTPxJXnwhR4eij4R+56am4kljgxIAIFTb3dltfepeC77dw/LIkRoWU5Os3
Pyin4O+qNVs0pamQ+fAcv8LXZJx/UObW7q3EfBx/8v9AMm4utumCrywVPM6u
LXhcOYbfj/seV6xAhV2CH7Rzk5Lw+equwEZFKkiNb+oVmkvENQabXN8oUeGH
XtTQ3UOJ+EWLk9jGXVQYZ8mJTHXH4+lijJUwHSrc5L8XniIag7dakMZz9ajQ
c8fctdIgGl+Kk/58zYAK6mH5s75eR/GgwT/3BzAqYGZmluzPI/FKsW83lhAV
rnoknzjGFYl/s+g8L0qjwnHOhpARswh87+3y2N0mVNCeNc7q+BKG5wz+d8jX
jAqt2UFy45ph+FOxeJdjFv9f76GQfWYobhhvT2m0ooKwWYOcq0UILme5YVl+
HxV6H1SXWa0/jJPf0nskHakQ8/q0yHqeYNzEPbFSwJkKJ590PrgtGoT7h/7b
u+ZGhRejFQfl6Ifw2BUd1XkPKpTI8PomeQXguWkh68b3U+EiH5uKX6Y/Xls0
erPfhwpt73zWhEf98PYdSsdf+1FhMdrWO1nBD++r8nbq8CfqldKj+MzLF195
/JmrPogKqe+Ld+vNHsBNxrrd/4sg8hHg73Lb44U7RPDqpkdRQa/7ih61bj/u
z2bOmxBNha31Vr2dMvvxXOHWxkPxVHCTfdPmseyBX7ywmuOVSIX4+00vFEM8
8FolowNOx6hw3lr2sVqfO95HqRUwS6VCQ2wuZe69Kz7SPvULT6fCtXTvN/4/
XPBl1q4WnUwqVI35bNg974zLHajwl8+hQqjgOq1oTSfc/8SZx6unqKBadkps
5q89Hiv29uzcaSqYVn+oVDSwx3PKBA6PnaVC7a6yWaNEO7ymLlO6v5gKnm53
Dzpv24u3o6czr0qosIdm8V4g0hbve7b+2dMyKpw+YBG2rtcGX/4cG15XToXr
bBJTU+f34Jv97lreuEKFg1Yaz8u59+ByM3Nyl65S4czL4fsrUSzchCu4K+8m
FUZcT3WLdVnhueqeOw/VUcHsZ5GjwIgFfrGxeGV/A1FPWWGtQA4LvJbW/8bx
LhVkTkOioKI53mdvm2jaTIUFfp5A53hTfGQg1x5/QIWk3WHfT9aa4Cv+L9V0
HlHh0lSXD5o2xrcnGH/Y/oQKt+ruH1WOY+DkjceqJJ4Sfo0sCeV+ScdNTrak
8D+jAsMjE4pk6XjAFT2t1ZdUUNr/4Z5qPxWv7VbO+tBLhZltcZE9wgjPk39U
vviOCjry16QUJjA8INLhodQHwk/viucGXlPw7dvS5lw/UyGH+3CuQYMhvhKy
lT/hKxXWX2YbVGk0wPva61RKvxHvp32DtFr18dygQffvP6nwPe6l4u4pXdy/
NSZ6/W/C70g0qUNIFzcRFTqlMEIFLcdqhgbSwZebqc99Jqig//rFv6s3tHF/
vhLy6DyR31M+SauPJNzEU9ea9x8VZCOXXTbokXC5us6Du5YI/2kYDxzV1MD7
XJYvBK8RvKdu3ivoV8Nrqk/ezVtHA/5KfcfoB6p4Dodq7+31NEDFD7Xabqng
xjccN/7ZQIMbuz1/CV1XwmXZpuVFNtGgAK9Y9GvYiS/bpuO6vDTQU72e+fCl
In5nqT40ip8GT+Wsf5AFduCylsJflsVpEGMVkT63IIcvX7i+ICNFgwAei0w+
Yzn8/QxNCMnQgL4swvx5WhbPOXfELEmOBnb2nHXNZVvxgxPcXhflCf2o1kc0
UAZn0ErjHu+gQRlZIk+cIY0vDXfd4VShQdUTmmGQkCT+DvPpVFSjwbJQi9nc
Jgn8zn8rv0zVaXA7tudWNq847megJpOpRYP1hhXSR9VE8XfpGWmbjWjA0e7Y
3f1WEL/zSfaiBkYDU5f1k2bCgvgJUuN9FqKBPNY5YeAkgDP6hqbz6TR4PN0Y
9H5+C75NLZ631pgGqqEKHswbm/HFBJGdb01psDFRJqEoiA+/vZPhIrabBmeH
+R0/ivHg2TEfI/StaEDh2m7xc2Uj7tcd8p8jiwYCIprZfye48a2RZe1Fe2kw
MCLu+d8UF57dvkqSdaXBS4WpveM+63E4MqQp404Dy76zSU1X2PE/Ul1akp40
+BI9/OTC5Drc5UgxWfgADSLu3j594yQbzi+doiPgSwPHfJJEw5c1rK39kO7m
gzQotaRnOFxcxXZJU/S5A2nAtVNNvXL3Mva9Xd6AM5gGRoPH5hK1lrDCIzyG
7EeI+lxOU57ZvoittvcbLYcR4xmhQpLbF7CuI0fRVCwNDCVH54ty/2DHpD1h
PJ4Gpxdeqho9nMV0n5pRRxJp8P4I94f7CzPYBWlx+uBxGngckNlFT5zGbJ6u
0b+lErwPif691zWFcYX8YnxJp4F1Y9HeNfkpLPhpvUlfNg3M4t2iXz0exxRC
Lpi+zSHq7copo1wwhvVJp5r15NGgRHNTrebhUQxC7CxeFtAAG+LLLDIfxvhl
/jAfnqdBOe3Q30sRP7G2px+tmi/Q4OKRyh2aZwexqJDH1k2lNLjMk9zr1vYD
G3iav6f2Mg1yd6Wb2mp/xwpCom1uV9AgL6huV1zEN8xMZr/trUoa1GbuKOd7
NIDdDtG0q7xB9IPX54gT775gPjIS9uW3aKAR/nK8u+AzJtnBtu9iNQ10/1aV
PHL/hB2TeeVwvpYGExLL559J9GM2HUEuefdpkHUb1awJvMO4Qu1dT7TQwLv+
sqq68lusSQZ3y3xIg/lwIXqFeS+2PZTP43gbDf4Gx1zjLu/B3snMeSS1Ezxn
21aNv77GMjs+ecZ30MAq57+WELnX2IzMDa+olwSfYkbEk6hurKLjpHd4Fw2U
X+ad3a7chTmFxhwIeUWDbWEJ8Ty/XmKtHRa+h3ppcE3l86aDGc+xk6HD/h6f
iPdccvDQqR2TNIk+YvuFBkUXsONeQU+wi+I8USYDNNAyji2Iy2rD7jSrpagN
0kCF5/6piwOtmGFec9a2IRpUBot7LIu1Yo/2W+UL/qaBe9gpf/99j7BXGw6X
LIzSoDAOgtL7H2AO/WwVo+M0sAiafqaR2oIN3PjvxpdJGsSe//LrAmrGJvfU
3G2bJfguKnDf/tCEbT4//yZviQa/hwIb2s/XY4VBaf3JKzRImYjku1JZh8lQ
xb9FrNHA/t/NlykttZjakMGEy3o6qMZHD97gqsFqG5//seakwyac9VdH/w5G
yXJeom2gw5yWeSkechuzJMVxK/PQYdHVfv/EchXWw755izQfHfx8fKU3lN7C
nN5eENmyhQ72rxjOeXtuYv7RD7fPCdJhA+nE/qufr2HpbeuxR5J0+BXe/kMm
qwLjP11Ar5WmQxjXGfnG/HLs9MEdFle20kHsAOVE/eXLWMVm030nttOJC++P
M+Shi5j6t/euiQp0WOd4n21Y+CJWX+PnHapIB4rcbKf/7jLsiUPmEUcVOtCF
tChvK0uw3apSUbvV6PC9sHVrpNkFrHflejxSp4N+o9rS6vx5bPBiZ9YOLTrs
PFUtaxd/DmMf56+YNqCDbK0D+1HFQizzQdmNQSM6XPbVF47edQoTyNeqeY/R
4XfUxQdbUQEmq7f3YTOVDn3Xx/NOJuZjlRt/tlfT6dCkv6qbW/UfRvoU3nnJ
mA4p/K1bU37lYSjpdH+GOR3yV07YdHzLwdptlb7FWtJh8hldSiv5BGalePdX
MJMOT6Wwdy3a2Zjbi/4/dnuIeJ5ENjY/yMCGigOWzGzpMC/822/1bDoWeHh5
HcWODg83zRatJqZhsSJbt2x3pAPPXata6dAUrPP2RifkTAefA+yyg37Hsa1W
c5ddXOmw0pP7Hx6QjD1IfWl42pMOWua6Y14nkzB++caUWi9ivjXFO5KNiZjH
g0uvXh+gQ+PWJNvIrgSMfSHah9efDulkLrtrT2IxmwKf28qHCJ4vBOK6XWKw
SySbZZMgOtG/gQwSZzTGOKicnxRC8Mq004lOjcROcYp8vhBGhwemPK8HXSOw
oTI2pfsRdGi9eFLxBD0cS+t/3zwfTXz/2Wz/nG4o1hfxmFs4jg7f9n4OiaSH
YEpCVbaaCQQ/R63fTc5HsOeWqcMByXT4ocU8d9MpGJP8fYSckUKHMmryvNWL
QCzguGtCRRrBky19wcb6EMbbTBb5lkWH1cXS3B8nDmKujrIeqyfoYHLB4WeT
iR92a47nulQeHQ4I2YZkbPHFrNV/gH0BHSqHemR5u7yx0uddWaGFdHhRUgb2
rV7YlE/Tu7wzdHC2VnnR+ng/ll/y36EX5wk/NcTcTxv1wH4YxTX8vkCHifmp
J7X8Hhi5z4+dq4wODXKitxyT3LC3/HAGyon+6ioU+R7njCneVP3heoUOe8YP
dWWJO2ER5mLqMVeJ+l3o9xpvc8DEj008rrtJhw/ZfEnh1vbYwa39m99UEeOP
2q3nULPDmpqeOE7dpsOTdW8DJMT2Ys6z5ydV6ulwrNciYbOoDXYjN93QrJEO
its0xoqV9mDLqmEpB5qIfNpaVgVNWdgFb0up0hY6lDxTPPPYgolNsun5ND+k
Q/PVlmRmhyUGxdtv97fS4fSWI+5WjhbYt7f/TESe0qEjL1d3/LYpphXy8z+t
Z4T+my7WFmmCHdv8+pP1CzqcjDG+dIxpjCmYVoZkdtMhtWxPa9EOOhb242Tz
ldcEn38HzyQq0rAnCQncT97Q4Q2P230PMhXzabS/sPaeDj85vHX4hnGsYS9t
WLqfDodpFunalhjGPb2LbPiJDk5eyveOtxphV5U5n4cNEP6wyTsSPaaP9UhT
lwK/E/vNjnMd/+7oYctb4tR8B4n1rZ9pZqbrYlbzf3Icf9Phtl5SgKAbGYsa
Jj20GaFD6Qmja40u2ljZp0PTlmN0EDnxa+tLXy3sT+ugLT5FhztnDuwfLiVh
W+tlU/Rm6MBbv7xcX6SBmV51qSf9oYPg+x+lIpvUsXO5veLyC3SYefWtLkBW
FWs7xm8hvUiHv6Lu2wralbHx8N0xIst0GBHP+n46TgkDl7bPG9gYkG94sJtD
ShHzt2bbso6dAYIb5cUn1xSwkzQKLK5nwIwVRbZ+Rh4bUqq9OLaBAcofqkYM
1+QwfumpNz83MsDX0877vpgcZrBFjfMrDwN2bqHtKzOSxbLnLvm+3sIA9s9z
Fe9MZLD631/PPBdgwNTB1NrCl1LY149Szx8LMeBbukIc9wFJTKv1pFq9GAPq
Q5bmg56LYS513a5VEgxomQrYXXdKFEup5MmtlGJA/G/la9aHRbC+nOTpc9sY
kHBcwjiXJYSxH3uwvUCOAYVN5wV79gpiquFLtifkGdD4bVHv0gEBLN45tD5h
JwMmDRfRRrstWKVV1a8oZQboLFAyvzfxYa+po+Ihqgz4ui38jpkOL6ag5BXj
rcEACR8bykOvjZiVVMkNV00GcJQnYjMi3Fjk5o+f7bUZ4Kg+ZDjdx4U9/2MD
5noMOLuF7zt/Dgc2+yvnCM2AAcP0lrEr8esx6Y/PLxoZMeBe3/cnf2PZseBH
NE51xIBH6yI+CZayYWdq43V3UhkgL3opWDdtjdJ6pclXls6ATnrtzeuDKxTh
HK3ngqYMGHoV6uv6ZZGCJwUt8ZgzQFT7Q0161D+Kb9g1NU5LBmgXSQ/8UVig
NDltz/1rRdQj6/vRueo5Ch/13PSwDQO0ShimZ2NmKR47Bfd+smdAYPQJzofx
05Qavsz6LicGeAT8MnlwcJLC9WedxCM3YvyhQs8xzTHKaKAGB7cXA/C0jY+i
BYcpr365TFr5MuAcM+I6u8UQpc4zs/9UAAM4G4Idjbp/UM59bHjyKZjQdsuX
es9+oyTY/ayWD2PAa6+F7fcYXyne3YLn/aMYIOaz5ZNT20eKuTmk3Y5lwHGf
DPcLFX0U9ceBIQuJDHBwPvjx88BbihBW5IpSGGDoMX4w/+AbykJ9h1lqBgPU
OT9L6uu/poyEurdczWLAm0VLYxe9V5TPpHntzhMMuMO7mc8ns4vSek1+m3A+
4aeKVeJ/5QUl+0L8XNk5BvQqHLMPpT+h2Od/eKFxiQE5ogkzpFsPKWbWh6m2
5QyINp6elPJ+QDHi3dAQcYWYv7VSUSyjmSKbSr7YfJ0BmneOySKFJsrI0dwo
y1oGyEVO1htH1FI+6SpOBNUT9QuRP0XDayjds/e98hsZ8PTJTGiy+B1KbeCI
1Yf7DOhJ0It1WquixHsa7/B9woD/5P+Ly1uppBze+ulc5lOiP4z/FmrEXaF4
fQzhv/WMAWsc7juShSooZnalS386GXD4KNcvkYRLFEHzpdfH3jGgDlunwed1
gXKFdDv+wi8GiNztTLjgnU8JEpn+1zDMAPJ7C+1x8/8o5EVS+OtRwp98jewT
KI/y8HF1AMcU0a8yJ3x8a7MpffbVDv4LDMgLv16z4J5K4Y6r0tLdaAxX2En9
QZIxFL9nN4c6VYxh/9VdMp/LvCjK+69ZrQQaQ2DUd47Ak9qUj+Z379iNEuMV
Vt7ohL816rkUvQuFmoCueohIYNpBo4WaPZTtMyYgV/V7HJdgM1prDKlLDTKF
CbHRnvGs/wwtSSbGsXOm0PHIz/T4f0KGT101DgaEmsGeX48uvI04YyDo5Xev
ONwMpti1dkWhQgM3vzK+V5FmUNJuUr/NqMBgPkToDjnWDE6Xpx6/dTfPQCH9
7+LKcTMQUB8SLX6fapB450F2XqEZbNuwZuthGG5guIFVXXfXDBz13eCLkI1B
Km8G++97ZjC4OeVRqw/L4LVA617JFjMIKN39z6aVaeAnTf4X32oGZjmfK1ti
zQxOa4rTzF6YAbe8ZfK9PDD44zzwpv+TGXz00e0o1FM3AE8JRb6vZvBzVjtJ
Yr+qQZaPTRT6ZgYqvDpBGq+UDLYfaZO+/JOIZ/bM9StuCgZ7UisPBE6YwTmW
y0mzICmD81nfGkqmzGDHOfmN8+/FDX7nSW7qmTEDmqiPdVWCqEFiUfYt3b9m
YJDeslQfImjwsvQJ28F/ZvC86OQcVy2/gVjFqk3RkhlsvPl8/Xl8s8H+63rl
nStmUPCh+wTdk8fgVvXhv2trZrC/XiJvuIPb4H8P/Pqa
        "]]}, 
      {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData["
1:eJwV1nc8FV4bAHCpRCkqqzKvXZKdrOe5w46GkpLRsLKFzKwK94prZF0ZldIm
kTIy0lAiJFF+JEUqKlkp73n/4fP93HPPOfc5z/OcI3PYd7cLNxcXF5I///9P
Sfl7MV+yzMgwa7nutrpouMerLOXtngJW1pZi715FQ0PIrUtK7gUQumFqK3M4
Gh6r+bvxuN+Gs3GblvCujIGnSR1mv90eQmqvvF/CwRh4phd3/6tbG6R8sNJN
/RsDLal9/iNu/4HQ47sth0zjwKJ2mfUnt3H4MHdJtXDqNLSu1OFb4sCFSYK1
v59JJwEtxbj+yg5e3PsvsDaLKxVctsytVF8piM8fnfZ0bkyH7X3xxWKSgvim
tfNOR2s6aMULG3JtEcTaUv9seJsOS/5T82rbKYjOezIE+SbS4UKyW4t3hiA+
ozgH7ZfIgP++dZ25tmE1Ole0m30KzoD9N24vyG5cg/BXcO6o/DmwUnb5IWIq
hKcq2Mqd3pkwxwqqfm8rhMFLPK1/B2dCyffTpy+5CmFVevptwehMWHL38jqN
M0K45tz0Ks20THhgNEK1ahbCmhjlfPnKTFDY45kWRxfGFYVJ/LXzmcAV5a85
ASKo9pr/OPtUFtwajPlbuUMEr6WF5rYlZYE9I+1JpJMIbvfs3L/sXBZU8pXb
r4gSwcEuhxTn4izwypiMU6gTQYMJrcP3m7Pg7dUTXQcNRLGv4brOoqXZcKcr
MuiZrhgKRBT2tEdmQ8npo4c/mIvhxcCzD+6dzoZ8Hcsdfw6IIbeJjvu5s9nA
zBZT3hwpht6UwnXa57PhyMHyd+wGMYxv/BCxtCYbhD6O0O0s1mFQ/Mfaz9PZ
EPzLZs1n+/WYbLDLocg9B7wu6S0seK3HJWeUzh/0zYHDe2W+ip1cj+I8dU6r
gnPA+t73ZovC9RgUucl9b1wOKIYnht76uB6jE0+7+p/PgR7uhwNB3htwiUTK
9oG2HNBfs/H2kihxXGwfo5W5ORdeLjrwrDVFHBvll17l0cwF5x+JQ5mF4nhs
w5Exb91cONU+KqrcKI51sTv6pOlkfPLVaKulEvhA5V6QmB0Zv0J5dyZLAh3l
a+R3ROfCzzk7L6c8CSzhel2ncpp8/0vCGaWbEojmAuqLmLlw9dnIgwcvJdBm
QKQ4OZ2Mjy+R/W+1JCZaNX3Rv0zGL1H6rZgtiRN2ZUsGn+WCyOQ+gR8lkpjC
2Fyv8jIXSobilR/cl8Q1PRkevh250Nr42WF7H/n8dEzS214yPubKYz9JKTT+
xEWljpH1/ipk378khRsmnn93Ws4Btz9p54vtpPGEqb3ECJUDGdZfm0KdpbE7
xLqrn8GB+iLjL1bu0vjl8Kn+VlMOiJnN6EydkMY1j+ImM6w48DTDod0kSxoz
zHUdn9hxQFlVafHIa2msHH86XufNAduYGOWa99JoejLghb4fB2K7enewh6VR
OFdToiyAA71hZ/N0f0tjRe4V2dMnOMB88lM7UUgGMyVuLeqM5sCYc637RhsZ
PHTDcWpZGln/rkjKvwMy+HXhnOTKDA4wlvlVdByWwepbff3LMzmQd5PCHR4g
gz0rxtQmcjiwfS6e8zxVBu8P8TkcLuJAiNVgQ0GODNoqpserXOTApUK9keNF
MqhXKOowfokD8ybftMTLZHBRXdkapxIO3Ezf/dKrXQa3zEyPfbpF9vvp+iT2
yOBul3V3gks5wKO3dIPwgAz2m5boLJRxwHHgnlvtuAzmKI+dmrvLgVWbJRat
EqDg1Qbf8NwHHNCLDlb8IELBUa8DYRPVHHDtbLOqlKTgU4NsS6jlQF1obK6j
KgXFP0n6PnnIAd/HnzVvW1FwcY7iothH5DzwhqeKLQUbuRrPVjZzQLDa7+JV
RwrmVF9r+PCYA6W3Z9dc8qWgzY8QFcozDnBtrLOQCaGgw+sxD+0WDuy6FBub
H01B6dYn9vicAz+zV/zMTqVg4PSIh2ErB2hr25VFcilYav8sactLDqSfzTiU
foGCw4rm/uvaOKAVK/HqbDkFlVR9k7raOXBqfpB3RQ0FD3vWPit+xYHXwZcx
4REFI/j+vPbp4ECw55bS2NcUjBUsdh/p5MDj4V+fF95T0Ceo+Xd2FwdEnauk
Ij9R8IGioRP1NQeq9lBTTkxT0JvnWldoNwd425Y+mVygYJq342e+NxywM2/5
588ri0JnR4ZSiWcNbXy81slireKKksQeDlhUiV4elZHF2Sjv4FniXI137103
ymI+bZvBobcc+HKjUPijhizasrvn64n1FF2sDunLoubzW9VivST/ipRP99Nl
sTNNJcKduG/D9xr77bK4srGaWkqsknlnsmePLPJ6PROYII4QPKFi6yCLOr1N
o4p9HHjB1D/a6SKLEYnrO/cRSyzlytvpI4vhSkZtUcQ+UY86W4Nl8VBm4WAB
cd1swgrLKFk8N3B3ZRXxqkAr+tN4Weyjjts+JXb6vjrcmC2LUjLN9e3Epe7d
dxqzZbFJ8Kb1K2KuodwvUCSL31oll7QQ73RwotRelcVFmP7xAXHRG9kDendk
cSrk1K+LxD93jaTeeyCLGXe9tU4T017ceKbVJIu++59fcyROM/FfdOc5WX9m
/QE14g/12tu2dJH47OwzniO/V0N/zu/GO1lcbJ7kX0McV1FXojwsizx/bg0E
E3dtiRu4/E0Wb91ozlQmlrtmKiY3JYubX9tkdZF4B8rx7yz6J4vckv3DJ4gf
5bfHSy6TwzUuX06vJRZad+4hR0AOH9QthF0h5+eSvn9aTEwOd4dcfqpJzJPw
wXWtshxWeraFa5Pzt+W+ks9WJw50H7lG8uVKhGf3Sj05vBxTXy1GbOY/acxr
KYd99NFL70m+ZY9VRZ62kcMNy/oatIhHXSIruA/KYdrPVptTJD+ZB3jk/3rJ
4euFZcP8JH+N1PinRgPl8MLmZCcbkt8/lq550h0hh9HpwTbpJP/tyiQ8SpPk
sIAmX75A6kWeV/vmkRty+M1L7xKT1FfPe72TO+/K4aDOCoPzpP6SynGHYY0c
7mp4dvQqqc+fjtt/iLyQw4jRscBbT0h9VxzRbhmTw4M0/iHPJhIvlgfPvV9y
+D6ZudeykQOKh3zfXPwjh2vfvPSTa+BAMn94aOQKeRQwvnWzqY4D9kfSatU2
yeOK17rnKu9zYEqwwTjrmDxWnX/W5Ef617VPj0VOBchjSaSu6tcbHHCoefHZ
L0we20Al4NB1ch5uPYkWTHl0M1ievo30v9S68da/V+VRWLU3pZD0TxUvSduj
o/JooFKpvT2dAwNUOcVdP+TReZ93qWsq6ReiG2cMZ+Ux7TZla3gKB+YatXNF
+RTwtpl3UBqL3BfrrPpblBTw8VWGYFgcB448CXdVd1fAYVZ5nhq5D44aKFhP
+Srg50jTjhlf0h/L2rWrTyjgPZ2GmGpyn7hz5Jcaxyugy4KkvZoHqSfftot2
lxXQXkB6V48TB8JEZQejPiqgEF6XkttO8tmtxf6lsyJmBoufbpQm99u7QHq6
uyL2aCvsGZDgwLldUpvs/BRRTWsz7+x6kh/6gXODUYqYr+2yeYMwB/IFJHN+
5yvink/n2yl8JH73/LvF3yviiF3LZdpELjQsW7fLc78SKnjkV/U/yIVPF1Ut
3h5SQtqLjSuF7uUCPzLopseUUEDa8xu9PBfsQny1ZcOVMCT8vEv69VwYH2le
15enhE9w4+MfnFyQaAn4YDGghBdPB30qDc+F0KQXxze6KaPO0kNvHbfmgvrq
6MzRwI0YIfFVsL4wBx7wvlF6ErERrTTTNdfn5QCNS7X60qmNaDJy7j+/rBzY
M973n1PGRlTpyRhdm5wDwa1blbvLN+KO1B4n9fAcqEkcr278uRFrvu2perkn
B8y4nQY5fpuQ4vhRqXppDjj9MlSx9lLBsh+WatecsqEwv1l8+qwqVgXGvR0e
yIQ7yXp9HbvVsG3xf8xZl3Nw/IHhzvPb1fGe0d6YZeT9e/fAE+63O9XR5p2f
zjPRDJia21khtFcdU0cL1ZPXZECI/tH1SQ7qKJUxspLCmwERNcyPYT7quO/6
8mH/X+lwpu5NiB1bHQ1NQbyyJR2yG/2L1nap4/UwiTPfw9OhrqX4Z6K9Bt60
Znz6MJoGpWLt/pFOGli2L2lV/3AaXHSdm/A7ooF/9I62vBtMgwTuHeP7PDVQ
SJuHe/htGtjozYzJh2vg1oGSdOmWNBi5ajHckKuBB/NKNI2vp8HaxPE3s281
0ENX87u5XxrwvFm379t7Dfylpr73vlcazMgxugcGNdDn3jlXFY806K/P7noy
qoGfJboTJA6nQckM9dW5WQ0s//CrZdOeNDByz2hRX6eJHCkXuRndNHA33Vbr
YaeJ7hk/dK2WpsE3pXXNZQc18bkIg3t8URoELJ99MeusiTU/vvCc+5cK4a1V
7xI9NLFpb1XNt+lUSLbRnb8apon+wnZlr76kQoXTVv0veZo4uMN21+FXqcAd
on3/2KAmVjxMf5hdlArx+4Ub7gxr4nf1H8F1+anAr//76dyoJgbtuqc0wkkF
4X93e5g/NbGqvMzPNDMVlE5pzVxbrIVf1jYytFmpYM3W3Domr4UG1aUBz4NS
gVOiXuF5TAt1N/e3PbdKhcdvjzwt8NHCDS/1FgVbpsLP5Zl9nQFaGDO4u1jW
PBUsvOcWGYRr4RX3q1sTGakwp95kzZ+kheKONJlI/VSwq94zcuOmFn64afxm
ycZUEHl5YsP3CS28k7pkYyhfKtAWrqpSfmvhsrJ3ocxlqeCj9o5qO6uFNd4l
DflLU6E5Dd3rFmmj4Q2WUvuiVAjcx1eRvEYbvfmf9e+dY0PnQK71Fi1tdMvg
NxgdYwP7V22M3wltHO4yyVj9ig3eHexDB8O1sSXA+WtGGxssyo5QzaK0MfRj
z6H1L9mw1JdvkXS8NvZEuGZues6GsC97otsytbF/Xq/etZkNLoNjJ1UrtbFu
I88ngwds0GtbF/F1Uhsv3LrSaV3MBrFbX+17ZrQxu9u/adUlNvxOeqj/aF4b
Kdvc7dsvsKHUwuUPZ4kOBj1XCrIrZIP849IwSyEdzPumMxrOYYNgrWnoNU0d
DJNZUcCfxobha0HB7gE6qDYU0KQfzYY9Ev/6S4J1sGghpmBNFBsepZwxHQ3T
wasytOEvkWy4EJgldixOB2t3lXEKwtngbHT/gWeGDtqva9Jed4IN717N//Op
1EGm/iN1cx82dM3ExQfN6eAqmqBLpAMbmkzSsmNjt+Ld1X+PmBuxgWtH74eU
aF0scjwe0s7Dhqd1e2UDT+li5iT/t59LSXxVXx2xS9BFq2wUFCaWXvX0ozRb
F5cJHDtgt5gN2FrxqaxAF9PXByVVLKRAtGXql846XXxYnJaZ+yMFuMzMfor+
1cX5vWqsqq4UWMDKRYWh2zAyqqwzJSsFDjA+t/REbkOXkqJ4l3MpcNdULGN1
7DbUlNrN3paeAu7WYQpxzG2Yxv0t411yCrTbG1m6crbhxHUV6VVnUqAo+HGG
Su02/L6rfblEYArQb3Qr3ufSQ0ZRTkOvdQrEi05bdcTrYYYJHzPyXzKkPX06
1MjSw8FquMkznwz5obmh5Sl6WKbfviJ5Nhkq+wyLM7L0sPfv07CsyWT4WHBq
3vaKHtLqj0mf+5IMVKU11/se62Gg95IS/e5k+KO7mXd4qT7OLzpkrHsjGXwP
HGmcjtPHJAOuSCmbZBiI0ToK5wxwRfrKmoKTZ2Ftek5vYpEhxjjecZwoTIJi
wY2hTzhGmBKt8Sj1LQtUP+2fWVJohGu03jU6dbOgsjrxBO2SEdr1ivZs6WTB
Y9fRoNobRlhWXODc/YIFIzUlAeW1RrhuYbTIsJ4FKh6KXgX/GeH41YC8sCss
uNMg53RCFrAYjob1nWCBXtae/ruKgHZsg+6ZQBY0eZ1y+LkJsHD3JuF1ASzo
Ev1o760FaNRSuuewFwumvC/aHTEGbH/RHSd2iAXb1lN273ADfBqxrVfMkgX1
AVLGitcBs5ln61JlWDD3e5wtfhtwG7PmB0qxQCu0/t3qcsA7rzxNf4mzoCTq
UOD8A0DDP3Keh8RYwE66ePFVC2Bbli/vUQEWOF1W5I74AnhZW0OB5x8TspVn
rPy/A9IYkl6jf5jQceNpjutPQLHpEqH2WSaYlHuo75oDVPiZmXflNxNEB/aq
rV2KuFJw5nvUNyYsfM1yGhFCPLAtu7rnPRPyVKOXDokglsl97fvVxwRdP/fr
78UQ452WZa3pZULAL93pDnHEmg6vLwe6mfBp9m1yrRyi69oPDqJtTHjJI16X
poX4kktdjNbAhHzpQnHDPYhb/vsx4F/ChFVM9aebbRET3lpwrbzChKhfjccl
7RB1Uxw+Xy9mgvPj4ZYFe8RLh1cL/b7ABIrXptDGI4jvGijrKs4z4fK9ytem
xxFz3a/of0tngoiMWYxuEGL446b85jQmxDPfqiifQLzS7P+hKJUJ7g7zccvD
EWtPmgq6pjBh42KaRmssou+593ISLCbcsm5N3p1G1vswstQ0jgmSVY569AxE
/bSsLw6xTEiRmRjWzET8of+rNiSGCX6TawyFcxFZn8s0HkQxQSPXbuxNEeLi
LR1OXhFMuLD4S+bTi4gmxrXNF8KZsNY7nHa/GPGF3WaJ92FMmIT8nNyriI6r
VIscQplQOTxk6lCG6JRAWTgbzASFHUG/rMoRO0Snfw4FMSGriqfAqAJxubhx
jyFxCEt5Suo+YrqeR/Df40zQU/e99KEeMcX13/R1fyZcy+Xa2dmI6Och4StD
vGFJ2p+mR4h6Kfe7cv2YMN99d3fxU8Q8ST6PHF8m1EbMcbm3k/nzmi80ezNh
6vanidgOxDHb88xdxGpDHQPnu0g8Jo7xf/BiwiXz6/WdPWT+ydEeQeL+iKzS
772IIok/pW97kvwqjSvke4/IY1zwdxcxU+RgNAwi1if0+hQfY8IjczO/A0OI
U1nbuGyJ/0ZoOQcNI/J2vZdaQaxTKr2T/RnR0Hzpi0ceJN5D/Hh9FLF63Xvu
OOJrIrNbHo+R/YfGNBoTD5kPSw1+Q5y+/pd3JbF45CuB+XHEfQuWXT3uTLAt
rV0Q+Unme76XcpWYPXR1XH0S8bXXr4lI4mcimf9tn0L8xfhquI+Y2yK2zW0G
sadiikeb2CDS52HsHOKodJW5KHFw6YHb5+cRFYYfLf7nxoTbQyYFVf8QLzoU
aowSj4hopnRyUTFgoKazh5hiIRX1nZuKirXhH18QH4xc4cu3lIrGBpsPNxOf
K512lFtGxR/5ghaNxC+HhqyBj4pbJPfkNBHzirYbHVhBRcMxIatnxDSLGtWg
lVR02uJ0uJM4IrJEki1AxWh+1e5B4srSjFXXV1Ox67xn8STx+FD0v+a1VEyf
mXixguxfSdT7+4AwFS03nzFXJD5ssb//jygVtc0/iJoS50UavxRZT8W0fde1
PIm7S9Xr1MWpuOlocF46seBHiVvbJal4IuKJZT2xuejyfDdpKr6+sxp+ENdE
fog8L0fFwRHeISdyHlOlL72rFKi428A06Tzxlo8PHDqVqIj2Rcf+I75gkW7I
t5mKZ11W3/Ml5/8uMmqz3BYqDjDUJeqIhcs8JUCdijAQXSJI8ilBlPE3UJuK
lcV8ko3EjRZq31K2UjFwtHlBmuTjn0jx99e2UbFdoep3HLHPx8maAUMqrhVI
4rcl+VwiOnjjD1Cx4vwxuf/n+6BFa54IjYoHZkOMdH2YsKesOGK7CRVNNdxc
N5L6SP6Y6uVmRsVb0XXHrhI/ET15MNaCirpJWo4qpJ70TtoaVFlT0Y1a8c+Q
1JuM5bJ52X0kXp7TWSmkPrVe0zvW76eivJjUa0og6cdO0SWr7cn+bY/Z3yc+
dnx2z4IjFdv2VapPkPq+yxm72etKxTKxqDOnQsj4r21OqcFU9H6ZVU4/yQS7
YH6dhBCST9Uetnyk/xzjMuePCiPn6bdk6hVxilBjlddJKsY/6RHxIv2qx+Du
arMzVMw1NrdsOkXGn81u+neOxFvTrXqG9L8I0dc5v7OoyH+Mc2ksifzeotV+
X3NIfHRdNAbPMqG8ginee56KGkcl5LpI/5x/HxFUUUzFxdu8qnpI/01RPaTo
VUHi7fOLti+P7L9NmfW2i4o/2+5cmr9F6k22oXium4rUMMew3aVM8DxhV7/h
LRVVj18IvFZG6kMq/rfDeypWtdDvON8l8/l8dPowTPYXudN6+D7Z78oCrbEp
KgZDUZNJMxOkLYX658Vo2Pp36xIFcl8lPf6nJu1Awz03JE6tIvcj+n9Sl3Ci
4cUDm2riBFkwueGlxvpDNNSK/cCcWc2Cg/7ntYRcaOh3q/fxgBALNosb6PJ6
03Dplbmya+tZ8NI/FCYiaOi4+vFqcQUWCEpMWtXn0bBtd7WZhgELHj3ps67N
p+GZppmpeEMWhAQ07XhQSEOvx93L3xmxYOBJ2q67l2j4WXDAIIrKgrIA9b0l
N2hIv8ZdU2rCgt1PfQ6ya2g4wE+vuLeTBenHR485v6Ph3Q0xKmuOsGC9SZi/
TT8N8U5YtvhRFlwQWxFiMkDDB0sqd8u5kPdKrcpplY/k+81qyZvcWNC+zK9g
ZoyGb2lZimKeLLDr5bo89o2GPf5fV/CT98nAjdQb/eM0tDi2e3qeeHxX+f1H
v2jYOTPz8LUPC1blTXWy/5B4pcpQDpP3TaZPfG/cXxq2OO41MzzOAgmq2GDw
Ag0Fz+7aIkzeQyqftn0/uJiOq1lt4tVBLLBUi+RVXkHHk4+l4vpDWNDBvUpA
fCUdZxsqavJDWXDgdb6wgAAdd/F88bcPY8GxsHrK7zV03Mo9q9ISzoKER4sN
G9bTkSJ/Yjr8JIl3Vgb9rjgd3XYVSUlFsSDLQ97iiiQdZ66kR9URX15luu8s
hY655rbNP6LJe3DwjUO0HPHy0NzTMeQ9WO5+9LgCHf1F+M4Ix7Kg2Y7pv38j
HVf6OEQpx7Fg+6YNIdtV6LjqZknETeKuv9dPgiodmbt9fTefYsHHC60seQ06
SlQ8FZI5zQLub4KXf2yjY7J0eXj3GRYwHxbd+KhPR4OHpdRt8SxYnaZR/saQ
joMmnJosYumte+prqXQ8ciOqzDSBvOf4hh+X0ukYfrNsQw6x2rug1ovGdPwp
SN3wiRhisnoTzem4pIJaHZBI3q82SoMRlnTcd0Vl+x1ia4X7n32tSHzT3G2+
EXfPmH8/vIOOa3NMn8kyWeD4vHdy7y46XkqRu7yX+NN5zz9mNnRsFz7yIZbY
229+kcFeOhbe9g2+TjxJO8u7ZR8d9f97eKCNOEJYUoCyn45XDDvivxO3lvEd
AHs6nuiAP8tZLJC0/n3poAMdT51daJMh9vkyMB7qRCfvwQvzGsQPz7zQyzpE
R0mnxyeMiAVlq07fPULHG99EdBnEzg8vtr9yoePld9u1/u8y+5QN4250zE5T
PfL/8dwzYa78x+j4Ywu7+v/z7c5wLVP2omNduY3W/9e7qLZ73sSHjnulPR7x
EU++MDQ96kfHhwUvD38l+2V4KKfFBNBx6gqb5xnxuaXC7/MD6Tgq2XK54P/x
KOJSqgmm47KoS3p+xDpGXwPehtDRc27ffT3i+N43tVNhdBQr2LR+gcS3J7iJ
VyiSjrJhQXtqiZXW3rZRj6KjdnWuUxBx6O3cfOsYOkr1CGgqErdYnhn1jKPj
5tt2jzvIea4f8ddKPE3HW9d4V4cQe55yiLocT85zqHG5KDF/rZbwIIvE57L6
FyrJF4f90s7/zpL5FkU8bCX5dev3iusb2HRsipin2BDvUB1C2ww6jjifDLQg
+VjY8pJ1PJOOUUeyd9eQfJ1wfdDNzqbjtb/rChSJ0wpSvZ7n0dHnjeHRLyT/
h/Qj743k03HR5ahWKrFWjzs3TxEd7T3dz6SRenktiNlYTMdvqPJMitSTws1N
Qw5XSPw+qTMOknoLNhdVDb9Kx4rvmj9SSX2KxX5vqrhJR85qk0cjESzwkOxd
1Xmbjqb1Au/4iB88aN4/UUbOR9ucT47Ut/2vvPGNlXTUuWOaQCf9IP+o5YbC
Ojq2NSgfUCX9Y5xrq2ttPR21GkscRUl/wfOUst5GOj7qn6LNkn40+HrWRPgJ
ma8iJ/WKHwvkTEsCmG103F7qk3OT9LvAofTaK6/oOKGx9/vBY6Teo6J4mzvp
mJGk/3OJBwtcq2zzF97Q0dx5/YSRKwuuKi9tCRyg47YGYaUDzqRfiVP/eH+g
4/6YV7MjjiyYF4hUcftIR+4LW038HUj9TU0m7x8h9Z7qa+RzgORf40cbowk6
MrbxGKzbQ/Z78NH7ZVwMLK+oFVcj/f3YDi6BRdwMNL1j+WwPg/R3mgHOLWbg
zcS0igAayUeluxe+LmOg06YOzCX3RdLvi26vBBjoxh/7MkuH5F9y3I9cKQaG
ZwkctpAn9RH7kJIhw8BKcL63SJYFm4L+2JyVZeDMdkvKHWkWnLQ/XhmlyMD4
uGdq/zaQ+CgdCT+6hYHrazT+0NawwLeBtlQVGGh+IqI78i8TeCYXrWtwZKCW
kcn70pdMmCnNTv7ozMAOw8DtjOdMGPPesoT3CAMlRg1C2p4wof3zwXFrNwZ+
P9fG01rPhNy+e83vfBmIQwMrXe4wQbXJO2AmmoEPg+EMXwZ5b6e9fb7lIgPH
5y+4b9nFBLMdflSbYgYuWeTZX7OdCfr8y+4FX2HghdJrFjQzcp+f0bpQe52B
GplHhLSBCV9CU0Is7zIwmT3a8UCFCScPGcu7NZN4qrJOWvAw4Ypa2cn8zwz8
fHhDHqc8EXyEf8zeGyXzu/bfN7+VCFpzakGvxhi4/ajf7YmSRKhvKvVcMsHA
M6L2esr5idBjW2p3bIaBcdVWJ40TEoE38raGDp8xFo7yhqnZJ4L7s5ufWjca
o0hvmSr3fAIoH75m/dfbGG8PrbV03pQAT8/rlf70Ncbae9o1U3IJ4Pq2ZfWI
vzGyh52aEiQT4NLOsa6OIGMUFT5UUbA6AaRBxb4k0hjL+6WFc6fjQUT8lpvN
WWNM35pm9rQxHri7y6Kv3jDGiulNZma28dBnfv/O3jFj/FdsmP32+BnouBi2
GY6boFLke7dc/1MwU77LgPLTBCf1xkbWZMbCQlVAxRkfU0zTnVaVGo4m97GJ
ccRvU1R87nbuWsJJeOKwxcPzuBnWTm/xleoPhzVH3KvPB5mhKkN4eLAjHBzd
i1a2nzBDiWpBuPokHKYC1t7RijBDYFA9TMrCQS5heu7vKTL+X43Y/VPhEH3n
YRI70wwzKhc1H1cJB71lO0sr7pshJ9G3r/dkGJzhT+QeqTbDG42PrkoGhsGr
1Y171teZ4X4FZoaLRxi4i2vNnmw0Q8rRgFPzNmGQpS5GM3tuhpLqbDUr5TCY
tB/o7H1nhjGVCa1eXaGAh9YprPzPDHP6y070PQsFluvuEBg0w579Kru3PwwF
iv8j8UvDZhh3l+6gdS0Udp0pcfH+bobja7aqi0eHQh5r8F7BhBn+axBoyg0K
hRH2+uUdP80wS0VYcINnKERzkm7pTJvhLa3TRdK2ofCisJnLY9YML7/68bTY
MhREL//bzfljhozfKf4q1FA4fH1rcetfM5QZnUy6qxMKt0r9phcWzNCspY7f
SCUU/gdePnua
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     PlotRange->{{0, 50}, {0., 0.027205725123409474`}},
     PlotRangeClipping->True,
     PlotRangePadding->{
       Scaled[0.02], 
       Scaled[0.02]}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{0.422141775195646, 0.11087226223045778`}, \
{0.892676756704937, 0.4753392021832325}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{0.3927333388513153, 0.14124450722652235`}, \
{0.8632683203606062, 0.505711447179297}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {Hue[0.9060679774997897, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 0.08}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"pdiff\"\>", {1.2100000000000002`, 0.58}, {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {Hue[0.67, 0.6, 0.6], 
                LineBox[{{0, 0}, {1, 0}}]}], {0.08, 1.24}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"psame\"\>", {1.2100000000000002`, 1.74}, {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->0.7500000000000001,
          FormatType->TraditionalForm,
          
          PlotRange->{{-0.1, 3.26}, {-0.1, 
           2.42}}], {0.3958392415213505, 0.14322949127097906`}, {
         Left, Bottom}, {0.4705349815092912, 0.3644669399527747}, {{
         0.5881687268866139, 0.}, {1.305996925907968*^-16, 
         0.607444899921291}}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->{435., Automatic},
  PlotRange->All]], "Input",
 CellChangeTimes->{{3.5044275930625*^9, 3.504427601640625*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"t", "=", 
     RowBox[{"k", "=", "0"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"For", "[", 
    RowBox[{
     RowBox[{"x", "=", "0"}], ",", 
     RowBox[{"x", "\[LessEqual]", "10"}], ",", 
     RowBox[{"x", "+=", "0.01"}], ",", "\[IndentingNewLine]", 
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Abs", "[", 
         RowBox[{
          RowBox[{"Ps", "*", 
           RowBox[{"fps", "[", "x", "]"}]}], "-", 
          RowBox[{"Pd", "*", 
           RowBox[{"fpd", "[", "x", "]"}]}]}], "]"}], "<", "0.001"}], ",", 
       RowBox[{
        RowBox[{"t", "=", "x"}], ";", 
        RowBox[{"Break", "[", "]"}]}], ","}], "]"}]}], "\[IndentingNewLine]", 
    "]"}], "\[IndentingNewLine]", "t"}]}]], "Input",
 CellChangeTimes->{{3.504416622265625*^9, 3.50441666165625*^9}, {
  3.50441671778125*^9, 3.504416807578125*^9}, {3.504417197265625*^9, 
  3.504417209625*^9}, {3.50441724275*^9, 3.504417246984375*^9}, {
  3.504426466796875*^9, 3.504426480515625*^9}, {3.504426537453125*^9, 
  3.50442667278125*^9}, {3.50442680228125*^9, 3.504426810609375*^9}, {
  3.504426955390625*^9, 3.50442697196875*^9}, {3.50442700659375*^9, 
  3.50442700684375*^9}, {3.504513281453125*^9, 3.50451335971875*^9}}],

Cell[BoxData["2.1799999999999975`"], "Output",
 CellChangeTimes->{3.5045135295625*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"bayes", " ", "classifier", " ", "minimal", " ", "err"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"Pe", "=", 
   RowBox[{
    RowBox[{
     SubsuperscriptBox["\[Integral]", "t", "40"], 
     RowBox[{"Ps", "*", 
      RowBox[{"fps", "[", "y", "]"}], 
      RowBox[{"\[DifferentialD]", "y"}]}]}], " ", "+", 
    RowBox[{
     SubsuperscriptBox["\[Integral]", "0", "t"], 
     RowBox[{"Pd", "*", 
      RowBox[{"fpd", "[", "z", "]"}], 
      RowBox[{"\[DifferentialD]", "z"}]}]}]}]}]}]], "Input",
 CellChangeTimes->{{3.504416622265625*^9, 3.50441666165625*^9}, {
  3.50441671778125*^9, 3.504416807578125*^9}, {3.504417197265625*^9, 
  3.504417209625*^9}, {3.50441724275*^9, 3.504417246984375*^9}, {
  3.504426466796875*^9, 3.504426480515625*^9}, {3.504426537453125*^9, 
  3.50442667278125*^9}, {3.50442680228125*^9, 3.504426810609375*^9}, {
  3.504426955390625*^9, 3.50442697196875*^9}, {3.50442700659375*^9, 
  3.50442700684375*^9}, {3.504513281453125*^9, 3.504513391984375*^9}, {
  3.504513462234375*^9, 3.504513465875*^9}, {3.504513570171875*^9, 
  3.50451357259375*^9}, {3.504513615140625*^9, 3.504513621453125*^9}, {
  3.504513878859375*^9, 3.5045139435625*^9}}],

Cell[BoxData["0.11109502337524729`"], "Output",
 CellChangeTimes->{
  3.504428075890625*^9, 3.504478790203125*^9, 3.50451323546875*^9, 
   3.50451336246875*^9, {3.50451356534375*^9, 3.50451358771875*^9}, 
   3.504513697234375*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"ddiff2", ",", 
      RowBox[{
       RowBox[{"#", "\[GreaterEqual]", 
        RowBox[{"(", "t", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "ddiff2", "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"N", "[", 
   RowBox[{
    RowBox[{"Length", "[", 
     RowBox[{"Select", "[", 
      RowBox[{"dsame2", ",", 
       RowBox[{
        RowBox[{"#", "\[LessEqual]", 
         RowBox[{"(", "t", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
    RowBox[{"Length", "[", "dsame2", "]"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"t1", "=", 
  RowBox[{"N", "[", 
   RowBox[{
    RowBox[{"Length", "[", 
     RowBox[{"Select", "[", 
      RowBox[{"ddiff", ",", 
       RowBox[{
        RowBox[{"#", "\[GreaterEqual]", 
         RowBox[{"(", "t", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
    RowBox[{"Length", "[", "ddiff", "]"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"t2", "=", 
  RowBox[{"N", "[", 
   RowBox[{
    RowBox[{"Length", "[", 
     RowBox[{"Select", "[", 
      RowBox[{"dsame", ",", 
       RowBox[{
        RowBox[{"#", "\[LessEqual]", 
         RowBox[{"(", "t", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
    RowBox[{"Length", "[", "dsame", "]"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.504427786515625*^9, 3.504427787765625*^9}, {
  3.5045137699375*^9, 3.504513803875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"(", 
    RowBox[{"1", "-", "t1"}], ")"}], "*", "Pd"}], "+", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"1", "-", "t2"}], ")"}], "*", "Ps"}]}]], "Input",
 CellChangeTimes->{{3.504513809609375*^9, 3.504513827984375*^9}}],

Cell[BoxData["0.08613728129205925`"], "Output",
 CellChangeTimes->{
  3.50442667809375*^9, 3.5044268948125*^9, {3.50442696034375*^9, 
   3.50442697509375*^9}, 3.50442701078125*^9, {3.5044277899375*^9, 
   3.5044278174375*^9}, 3.504428077296875*^9, {3.504478793953125*^9, 
   3.504478812078125*^9}, 3.504513244140625*^9, {3.504513777546875*^9, 
   3.50451382875*^9}}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"KNN", " ", "\:540e\:9a8c\:6982\:7387"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Vn", "[", 
     RowBox[{"x_", ",", "data_", ",", "kn_"}], "]"}], ":=", 
    RowBox[{"Module", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"tt", ",", "dd"}], "}"}], ",", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"tt", "=", 
        RowBox[{"Map", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Abs", "[", 
            RowBox[{"x", "-", "#"}], "]"}], "&"}], ",", "data"}], "]"}]}], 
       ";", "\[IndentingNewLine]", 
       RowBox[{"dd", "=", 
        RowBox[{"Ordering", "[", 
         RowBox[{"tt", ",", "kn"}], "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"tt", "=", 
        RowBox[{"data", "[", 
         RowBox[{"[", "dd", "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"Max", "[", "tt", "]"}], "-", 
        RowBox[{"Min", "[", "tt", "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"pknn", "[", 
      RowBox[{"x_", ",", "Nn_", ",", "d_", ",", "kn_"}], "]"}], ":=", 
     FractionBox["kn", 
      RowBox[{"Nn", "*", 
       RowBox[{"Vn", "[", 
        RowBox[{"x", ",", "d", ",", "kn"}], "]"}]}]]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", "\:53d8\:91cfx\:7684\:6982\:7387\:5bc6\:5ea6", "*)"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Pk", "[", "x_", "]"}], ":=", 
    RowBox[{"pknn", "[", 
     RowBox[{"x", ",", 
      RowBox[{"Ns", "+", "Nd"}], ",", 
      RowBox[{"Join", "[", 
       RowBox[{"dsame", ",", "ddiff"}], "]"}], ",", 
      RowBox[{"Floor", "[", 
       RowBox[{"4", "*", 
        SqrtBox[
         RowBox[{"Ns", "+", "Nd"}]]}], "]"}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"total", " ", "vn"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ki", "[", 
     RowBox[{"x_", ",", "data_", ",", "kn_"}], "]"}], ":=", 
    RowBox[{"Module", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"tt", ",", "dd", ",", "n1", ",", "n2"}], "}"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"tt", "=", 
        RowBox[{"Map", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Abs", "[", 
            RowBox[{"x", "-", "#"}], "]"}], "&"}], ",", 
          RowBox[{"Flatten", "[", "data", "]"}]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"dd", "=", 
        RowBox[{"Ordering", "[", 
         RowBox[{"tt", ",", "kn"}], "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"tt", "=", 
          RowBox[{"data", "[", 
           RowBox[{"[", "dd", "]"}], "]"}]}], ";"}], "*)"}], 
       "\[IndentingNewLine]", 
       RowBox[{"n1", "=", 
        RowBox[{"Table", "[", 
         RowBox[{
          RowBox[{"Length", "[", 
           RowBox[{"data", "[", 
            RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", 
            RowBox[{"Length", "[", "data", "]"}]}], "}"}]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"For", "[", 
        RowBox[{
         RowBox[{"j", "=", "1"}], ",", 
         RowBox[{"j", "\[LessEqual]", 
          RowBox[{"Length", "[", "dd", "]"}]}], ",", 
         RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 
         RowBox[{"For", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"i", "=", "1"}], ";", 
            RowBox[{"n2", "=", 
             RowBox[{"n1", "[", 
              RowBox[{"[", "i", "]"}], "]"}]}]}], ",", 
           RowBox[{"i", "\[LessEqual]", 
            RowBox[{"Length", "[", "n1", "]"}]}], ",", 
           RowBox[{
            RowBox[{"i", "++"}], ";", 
            RowBox[{"n2", "=", 
             RowBox[{"n2", "+", 
              RowBox[{"n1", "[", 
               RowBox[{"[", "i", "]"}], "]"}]}]}]}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{"If", "[", 
            RowBox[{
             RowBox[{
              RowBox[{
               RowBox[{"dd", "[", 
                RowBox[{"[", "j", "]"}], "]"}], "-", "n2"}], "\[LessEqual]", 
              "0"}], ",", 
             RowBox[{
              RowBox[{
               RowBox[{"dd", "[", 
                RowBox[{"[", "j", "]"}], "]"}], "=", "i"}], ";", 
              RowBox[{"Break", "[", "]"}], ";"}], ","}], "]"}]}], 
          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"BinCounts", "[", 
        RowBox[{"dd", ",", 
         RowBox[{"{", 
          RowBox[{"1", ",", 
           RowBox[{
            RowBox[{"Length", "[", "data", "]"}], "+", "1"}]}], "}"}]}], 
        "]"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Length", "[", 
     RowBox[{"{", 
      RowBox[{"dsame", ",", "ddiff"}], "}"}], "]"}], "*)"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{
  3.504415922515625*^9, {3.504429210578125*^9, 3.504429225953125*^9}, {
   3.504432802859375*^9, 3.50443280434375*^9}, {3.504432899828125*^9, 
   3.50443290078125*^9}, {3.50443293875*^9, 3.504432962078125*^9}, {
   3.5044330644375*^9, 3.504433086453125*^9}, {3.50443337365625*^9, 
   3.504433375078125*^9}, {3.504433636046875*^9, 3.50443363790625*^9}, {
   3.50443368965625*^9, 3.504433768203125*^9}, 3.504433804875*^9, {
   3.504433839015625*^9, 3.504433843703125*^9}, {3.50443387959375*^9, 
   3.504433880234375*^9}, 3.504434007921875*^9, {3.504478545609375*^9, 
   3.504478566609375*^9}, {3.5044788276875*^9, 3.5044790515625*^9}, {
   3.504479092515625*^9, 3.50447910740625*^9}, {3.504479163890625*^9, 
   3.50447921690625*^9}, {3.504479379359375*^9, 3.504479539171875*^9}, {
   3.504479728125*^9, 3.504479768609375*^9}, {3.504479868796875*^9, 
   3.504479871734375*^9}, {3.504479942390625*^9, 3.504479973375*^9}, {
   3.504480151109375*^9, 3.5044801845*^9}, {3.504480245078125*^9, 
   3.504480250296875*^9}, {3.50448032390625*^9, 3.504480339578125*^9}, {
   3.504480380625*^9, 3.5044803973125*^9}, {3.504480455609375*^9, 
   3.504480564828125*^9}, {3.504480628328125*^9, 3.504480786234375*^9}, {
   3.504480854359375*^9, 3.504480876375*^9}, {3.504480908703125*^9, 
   3.504480908875*^9}, 3.5044809603125*^9, {3.504481067875*^9, 
   3.5044810704375*^9}, {3.504481115140625*^9, 3.504481189109375*^9}, {
   3.504481283828125*^9, 3.50448128415625*^9}, 3.504482074390625*^9, {
   3.504482162484375*^9, 3.504482162671875*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", "\:540e\:9a8c\:6982\:7387", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"pks", "[", "x_", "]"}], ":=", 
    RowBox[{"pknn", "[", 
     RowBox[{"x", ",", "Ns", ",", "dsame", ",", 
      RowBox[{"Floor", "[", 
       RowBox[{"4", "*", 
        SqrtBox["Ns"]}], "]"}]}], "]"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"fki", "[", "x_", "]"}], ":=", 
     RowBox[{"ki", "[", 
      RowBox[{"x", ",", 
       RowBox[{"{", 
        RowBox[{"dsame", ",", "ddiff"}], "}"}], ",", 
       RowBox[{"Floor", "[", 
        RowBox[{"1", "*", 
         SqrtBox[
          RowBox[{"Ns", "+", "Nd"}]]}], "]"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"pin", "[", "x_", "]"}], ":=", 
     RowBox[{
      RowBox[{"fki", "[", "x", "]"}], "/", 
      RowBox[{"Floor", "[", 
       RowBox[{"2", "*", 
        SqrtBox[
         RowBox[{"Ns", "+", "Nd"}]]}], "]"}]}]}], ";"}]}]}]], "Input",
 CellChangeTimes->{
  3.504415922515625*^9, {3.504429210578125*^9, 3.504429225953125*^9}, {
   3.504432802859375*^9, 3.50443280434375*^9}, {3.504432899828125*^9, 
   3.50443290078125*^9}, {3.50443293875*^9, 3.504432962078125*^9}, {
   3.5044330644375*^9, 3.504433086453125*^9}, {3.50443337365625*^9, 
   3.504433375078125*^9}, {3.504433636046875*^9, 3.50443363790625*^9}, {
   3.50443368965625*^9, 3.504433768203125*^9}, 3.504433804875*^9, {
   3.504433839015625*^9, 3.504433843703125*^9}, {3.50443387959375*^9, 
   3.504433880234375*^9}, 3.504434007921875*^9, {3.504478545609375*^9, 
   3.504478566609375*^9}, {3.5044788276875*^9, 3.5044790515625*^9}, {
   3.504479092515625*^9, 3.50447910740625*^9}, {3.504479163890625*^9, 
   3.50447921690625*^9}, {3.504479379359375*^9, 3.504479533125*^9}, {
   3.504479565421875*^9, 3.50447957015625*^9}, {3.504479632984375*^9, 
   3.504479662328125*^9}, {3.50447977446875*^9, 3.504479784625*^9}, {
   3.504479820359375*^9, 3.504479836265625*^9}, 3.50448016371875*^9, {
   3.504480919453125*^9, 3.504480949328125*^9}, {3.504480984578125*^9, 
   3.50448099153125*^9}, {3.50448209440625*^9, 3.5044820980625*^9}, {
   3.5044821689375*^9, 3.50448224928125*^9}, {3.504482290109375*^9, 
   3.504482344234375*^9}, 3.50448399484375*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"pin", "[", "20", "]"}]], "Input",
 CellChangeTimes->{{3.504482389484375*^9, 3.5044823914375*^9}, {
  3.504482509578125*^9, 3.50448250978125*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   FractionBox["3", "47"], ",", 
   FractionBox["44", "47"]}], "}"}]], "Output",
 CellChangeTimes->{3.504482392328125*^9, 3.50448251003125*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"If", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"pin", "[", "x", "]"}], "[", 
       RowBox[{"[", "1", "]"}], "]"}], ">", 
      RowBox[{
       RowBox[{"pin", "[", "x", "]"}], "[", 
       RowBox[{"[", "2", "]"}], "]"}]}], ",", "1", ",", "0"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "50"}], "}"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0", ",", "50"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.504415922515625*^9, {3.504429210578125*^9, 3.504429225953125*^9}, {
   3.504432802859375*^9, 3.50443280434375*^9}, {3.504432899828125*^9, 
   3.50443290078125*^9}, {3.50443293875*^9, 3.504432962078125*^9}, {
   3.5044330644375*^9, 3.504433086453125*^9}, {3.50443337365625*^9, 
   3.504433375078125*^9}, {3.504433636046875*^9, 3.50443363790625*^9}, {
   3.50443368965625*^9, 3.504433768203125*^9}, 3.504433804875*^9, {
   3.504433839015625*^9, 3.504433843703125*^9}, {3.50443387959375*^9, 
   3.504433880234375*^9}, 3.504434007921875*^9, {3.504478545609375*^9, 
   3.504478566609375*^9}, {3.5044788276875*^9, 3.5044790515625*^9}, {
   3.504479092515625*^9, 3.50447910740625*^9}, {3.504479163890625*^9, 
   3.50447921690625*^9}, {3.504479379359375*^9, 3.504479533125*^9}, {
   3.504479565421875*^9, 3.50447957015625*^9}, {3.504479632984375*^9, 
   3.504479662328125*^9}, {3.50447977446875*^9, 3.504479784625*^9}, {
   3.504479820359375*^9, 3.504479836265625*^9}, 3.50448016371875*^9, {
   3.504480919453125*^9, 3.504480949328125*^9}, {3.504480984578125*^9, 
   3.50448099153125*^9}, {3.50448236171875*^9, 3.504482362140625*^9}, 
   3.50448240478125*^9, {3.50448244175*^9, 3.504482458859375*^9}, {
   3.504482886921875*^9, 3.5044829083125*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxN0H0w0wEYB/BfbiyyS0ridjWjl+1KlrdarWnltagthRx5acxrtaHUqlHn
JYro1WK60os6b5leNKHiUqTRH+EOXaKXk/SyyKyXO8/Tc/fc9z7/Pd/HKmy3
QKhHEETIn/2b9Bzt5aL5lWuJfzPCbTnVvXcospc7ZS8V2edd5GcwTXvnotbp
J7iV4mRICiJcpswcHvtxK0APnNGmerttOwl80rhAQktCn/ZK0vt4Bl2QITil
VKIVTbY02aspE8QV0oxyr+/oUt4gx8xMH1xTpwgs9UU/mDj4ISEB3cj2T+ae
RrfVmJzr7EAPlKWoJwUG4A+fgkKfitEjTPZIfh564uoohaFGz1GEe27lk8G8
HNf6a5ung2Ve1TfU8eg6fet87Qk0W0pEbH2Oto+qnaHzMATbrGf5becZgQ00
1GGSozFYuHycwqKYgL0Zwi9z3eeAqzoPJT5dOQ+82pRZTjpCBUf+yiss8aeB
dzcN2pd708HHdxgs1MbagMObD0awRIvADWQLfkzAEjBrluzs+wQmeOdXzlKf
2KXg4qInVM0JW7zvJLtbLbADS+5zthRuYoHrWkpGMwNXgEXuq1RR/vZg+XWW
MibaAZz7VZWyZ58jeKA0MUkkdgI/css7n5rqDCY2d73Jka0E61xqphUnrwKn
m2u81els/M+O8EbN0dXgvhSHXdwza8Cz8y90ZV7igEtMmMnN8rXgevEC18U3
ueAiWjGV4+sCVknHCVE72mojecLabx24+gUj63UnOrtp0o4WxAPnS95Hh/Sg
pWbzZ9ID1oNvMPRbEvrQBt+mWTQEbwBfs6s8XDSIZoSV+mjjXMHdnveqtn1E
qy8fWMaVuIF/3uavoY+idXfFyrR4d/BGOzdX6Xd0c9DyqBiJB9g0XFRbmIgO
Fl2itO9D/xDPrnKQom0yNOPaY2hZ1cPs3LNoNnlLhfIeOs04U2+oFv1yVqOv
ZR1aRHUYO9yIPseax/N4hv4W2NfR1YN2CbVYROlFZ0UI9nP70fS9j6lXBtD8
tOvCuGH0xaz+O4oR9FCupZF69L8+8uwyJw36efETImoMbX51UiD/hQ676VzS
qkWXVezR6HTo3/VdXEM=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  ImageSize->{815.0000000000002, Automatic},
  PlotRange->{{0, 50}, {0, 1}},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.50447953384375*^9, 3.504479546671875*^9}, {
   3.5044796355625*^9, 3.504479662953125*^9}, {3.504479775296875*^9, 
   3.504479787140625*^9}, 3.50447983853125*^9, {3.504480950296875*^9, 
   3.504480985234375*^9}, 3.504482368296875*^9, 3.504482409890625*^9, {
   3.504482445609375*^9, 3.504482461875*^9}, 3.504482910953125*^9, 
   3.5044839995*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{
  3.50441589525*^9, 3.50443364396875*^9, {3.5044336813125*^9, 
   3.504433686265625*^9}, 3.504479563453125*^9}],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.504496626640625*^9, 3.504496626671875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"ddiff2", ",", 
      RowBox[{
       RowBox[{"#", "\[GreaterEqual]", 
        RowBox[{"(", "2.8", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "ddiff2", "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{
   RowBox[{"Length", "[", 
    RowBox[{"Select", "[", 
     RowBox[{"dsame2", ",", 
      RowBox[{
       RowBox[{"#", "\[LessEqual]", 
        RowBox[{"(", "2.8", ")"}]}], "&"}]}], "]"}], "]"}], "/", 
   RowBox[{"Length", "[", "dsame2", "]"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.504483013359375*^9, 3.504483016125*^9}}],

Cell[BoxData["0.9584784355746049`"], "Output",
 CellChangeTimes->{3.50448301659375*^9}],

Cell[BoxData["0.5941320293398533`"], "Output",
 CellChangeTimes->{3.50448301659375*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{3.504415862890625*^9}],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{
     Hue[0.67, 0.6, 0.6], 
     PointSize[0.006], 
     PointBox[CompressedData["
1:eJwUV3c81e8Xl2zZe++993aOvZJUtqTQULbsJEoy7jWzrnupJJKMUigzo7Qj
+UZUVEqSlpL8Pr+/7uu8Ps/nPs857+fzHjL7InaE0NPR0Y0w09H9/zdiO9Ne
0UklvNxnnr8mTIOZPO667XoqaOxyI6glkAqMMfdbt9mr4tPzwgq72qpgNC27
L4ZeD1Nrabz7JUtgXMU8q0RNGad43pmOLVPha2pyjug1VUwc3l/iebAKpF4d
GDceVcOyF4d4oIoC8rs2NJ9+18KwuqKBBiwHAzbDz07HFLHZ0zOM5SINTlKM
kvxqlFCdts/xhi4N5toa6LOblLE26DpNpZEKySJSocY/dVCxwljl6Paz8OXp
fla2x4roq/qf+d0sGuyVIi0mbFFBAZH1p37xVLDxWuZbVVDFAemu809HqqBh
zIWjVV4TDVNFVey6K4BabDe+fVIa/erMh1TrabBupZcXpyiD7ZcFJ8YHaJB7
az45kFMWfUyVYy3oqsEm74Df90Q13CR4vWvLfxRQuPHjUK+CDA5Mpt6oINZ3
QXXUO21ZvH663iBzczUUePx2/m0jh98WNprqeauBSb14u1mxIqpPUTfpU2mQ
8Vj/Q99DOeSu3Xubh68aSPz3LrYEymGGWJGQHFEfuNW4X4NbHv111q7V8FSD
O5eOdSxJFUPjrJ8Ep1fB8O09Ffu45PHHZo/bdcTzkC/LeSe+y2F3EV3ZbmI/
BasaC76P8igu4/sli7Ea1LKKczcbKyGD/7XrSoFEfywNad97lHCiZPhplzwN
CvUHltbYVTD6kODaeWJ+Brxf0yolVHFpI/a2x8Mq6Ly5Ojn/Uhfj57Yf67cr
gRKbtf1lvMqYu+5eiOtUsJgLrhQ9Tcz7GWdR5OkqqK8W4uenqeHbUU+D8G4K
HPpvXFr4tha60SaFRcPLweX+H/LnAkVU7IGBDWIeIU4HdJn7lVCKbVV4SI4G
eTqCRS2PlVEjLppnazkVdLkGDdYFddGjX3SHuNJZsNOqZ22bU0SddvsyjhM0
eFT87CLqqmD5ed1O971U+O+8gMs+F1V8ARYfP1+tghkpzvn9uzRxsqVWhq60
AvZFFoj+E1FE3pQXDgcHabC7oHL+lr0SXrikrMDlSwOG2c4yXg9l1MzwM73x
kgquENfeOaGDIctrATPxZyH3Yf6ugSOK6MZs++nMZRpcyW3tmbmujFZ9ex/K
X6JC9cv2OYFHKriYeaZbeRMVUvrP+Bx/roGH9QODov5VwO+NAI/mLbLoGWPt
wEvcrz/TUR5+vbJI9yvh1HOOatj4rbkqfVsOfRWKShyI+1A1wDW3KqmJIRf6
3/zur4AvTzxuBO2WxYjZoWMuzNUwMh32/P5fOTzjNmWkSuAPj5m7ewUUsOe1
n869TdXQdS8v269PGdNNvs4+rqFCEPOqmliCMlZH2106fJcKnfLBPEw+akg6
E3/ffYUCqtXSr28FqmGqFS2mbpEC0xn81bOK6igWYf7P3IsCytZql+nvq6CD
fpmtxGYqVH6wHvjWoIYvva/vzr5OAX91pV5tPnUkMe4xC9lPgTXHnk+FPurY
6iRYtqhFgbtO7i+Kvyhgik1JcM4TGiT8m54oHFHGrrEekydVVIiP/PU+ksCf
92uuYiSB/zGBXxU+lSrYTN6a0yxDhbDn8pzBoITeyjKZ4rtpcHA8vixEWAVl
PgmciImkwpW98v1/j6tgx8nBySJdKqhPNgw53yX4rc1aYYKBCpfGwlv5j4rg
OxU7C/Z3FFiVy0jJlJDCPzMilZw8NNBUMN3hpSGFEcM7y48I0OCIla1VcJA0
2n681kyXRIM6LL+bxymOpkMfxR3ZqaCnOqkeeksK+SnWxi5mNPhSx/Nfl500
1mZ1ii8coYHqXq2fSWRpXOsS8s/NpcHXW+cDlbL4sbz76Wl6zgpw4BZJ7lwX
xh3DP7bQGihQ/2XXHuQSwTdyFQcT2ygQ/K6WUfaNKL7TP2P0lVQFbKx8pl7H
BfHSlGBpknMldLQuWqQeFMHQlo72mRkK3NxKSpWSEEURs6tgYFgFVXSJk5en
RVHJSWruX24VcKePRgbSK2PIe3FlXUYazFYY7uaYVcUQNHhyzKkKLB1DF8bf
q2LM9A2NNZsquKWcWcPXrIZqkZPsrS0UEFLSOl2zSwUDN/5ZzW6lguyD8lpu
HTXkizh+Jp6rClzidpUxl6uhiaXd4ko/Bdjt1B/enFXD4e5N0d9zKXD6BvfR
PjdFLNmix7t0jQYxDq9fZKsReCVGWNiGUCGc+k7cn9CjPX0jNQ2EHtFH1dS1
/FXB5M0Hnr94WwXUk1mpmwi9UG5yeTND6EWTd12dWIoKhhhZK3/Xp0Jsp8iL
L29VsE155srYtyrIejgdCeqq+Ps1+8zlO1XQxPzjqs2kAoq/WYinTdDgVQqt
Ka9dGS38EuwH66hwPCROwqtbGddX+MqTz1MhL8GH2p+pgoeFZdkPa1LhSEDb
jI2aEvr+PZW9O4QGfeyZkyRmFaz8ustQJ4kKbhoatZkRRM1wSKnGnApbv/r+
NL2hgnUk6wArbirs53RpHe6UwrNmmddmTWmQvs48tNghi+MfVVyOEd8/P90b
put9ski9++/DB6LevuEg75Eth5OOYlJxBB987i6+1qMpg3nt3gonhoj7apRr
JMEuh/XjLfkShB7c9RN2VI2RQ8aTv+I8iPU2dX2r5Z1yeHKl6IYrUd+W1jzM
eUAdp3VvGh5QoMA+l9tJ9kXqyDrtNNhOT4G2YSvFV3rq6Ol6/42eKwXeDZjb
hoxpoJFPx4wKXSU8v7RbgNVSESUfmtWldtLg1AeGc2caFfHNjrwTjSWEHtsV
fZPyVUKN8aed791pkK19aHHLDzWcqtlyL/EYBSL1brNLOKriYm1aj2RrFVwR
Evj3PJLQN5cbyhfOVsGRb7eSQkVVMctDgCvicRXMeXymX7mhhvbNeqojlynQ
kXpkeyizPM7rhDu/Ifp1llR9nRYhjyP3mj9eI+bV0nIrJEhMAamV5yLtCf6b
Vz1gKHVJBc3CxHS6RKhQYra82vFBBjPU5yTKV2ng+2cyeY5JFuc/MUv9/keD
pOmv3eRRGXSLsgn+/ZUG+j9U7v3wksONZ3xdm4n5XSgyPj8oLYS20xzn316q
hPxdKlW+/UI4s3m++t5mCtjfY4V8RhFkO99zv6SJAlyH2nY1jEmjHVu1c2wd
Dfb3qgT8uySDndMNF7IWaLBFZTp3tlkGM2V6ZzI+0cA9aJZ3a6MMMt2ONQ/4
SAM9g1Rl0T+yGPP0e14qdzWIRd2+Xj8jhIdmOjve8lHAN1FnsGqTMIo1KekG
KVJgaJnz5YVZYeSRrwkbq6RAkIJbCaOPFMpm53ltlaHBQI6zHpuQOt5+7/Qg
IogCvy930alZq2Np3JlJKWsKbPX/zps/r4bCo+dS7M9QYH2p8+DOUxp4QXeF
qxkrwWNNTpQ0r4CZw4fRdYwGqzLX3jPtUEShpCAOA+J7ZhmvTVHaUMSt1S90
3sfRwIXMnPusRA0/Fuy64zlIgZ61WZusbFVMWzp+TPBUFWj73tFSI/zj9nux
686Ef9zxRSr/sJ8qei75nlOorYKDfWoHXv1Ww+OqqTOjiRRIOMW5E93kUXfV
P82eqxr0riysSHfI4/4R+U+GrNUgQmv8kR+igLxPtc40fqPBVePA1LqfKvjj
7wnxgfdVsGdvz1uBLarI9en476eTVcDXpbH5roEq/o1S3u3dXQWLPH6H5qZU
kCwy9Nt7tQreGr3VDEpWw/7oXvH1FxT4Iz9wf/cTOfywnVuGhbgP6zNXdqSa
yaOI/3iSBIFPhohPPf0HeXzx1jq9jfBfDj3TCtOJhP54B2btNKTC8+HujaEU
efRNik1c31INa/F3behriPtc9lX9GVs1KP8XOwqe8rhbsrPlOyfh31CPuf2z
AkbMhL3nekqDTYy6Tsd2iqP4odDIZQWCb/irvizySuDandifW49QYZny63xz
sCQKnKo+50H4l2P0VIOrjXLo9umL10HivD8EmUKY6O2xc/1OrkfWGaD1Z5kt
ujriKaPnSt6n0oDPI8nLRgJxB01j+sYqCab7mnIYPjvgTb2NO0udJ0DpRvxj
p0Q71G0+Uv+3Iwfm5XjYAkcdECwiqlo00iFf5G4rERPQ+vGLCuk9ZGhlrdDe
FuGAG41bpDpTMuC4fs7LyK02GK2z3uQ6QobVxm914g12uNP2Wrr/72wIOnQq
k2eHOd41nbQLky+A8+1FTB7edmjNEhN22CAXvqkeqB8dtUbJbSuGH/LJ8L5k
ZJOSuR1uFB7Ik63IhbekxI2gQXMMpPSxhi3lw6njCxCwZott8n3XqsLz4Obs
fj/LJTu8cIVyyH76DLQ98g9WNXfE6h6JpaWuNDi+y+2WmAhiq16KidE6CTRC
ut8OTjngZJDi8IuvJyAxg7mWlm2HxydTX4zH5YBwyrds45cOuETneUD+1wnI
76vrOEgDnBi+zUTvTYakYPYbG8cc0LrBRE7LLgOOhZ2/znHYDmuMtLfSL+dA
+82St/ldDtibXCrLGJIO32e5OIqCAK/u/tzbmE4GpinhHK8ABzzZMsvx+HYG
qO86+l2azhZLfA9vUkoiQ6xR6YFVL3usFz9g6s+dBWHzHxvYjC1wIyzGr/lG
PmxatwoS22SPM/FtyS65Z2D5vnvoopkIvrZ6OjtxlwLLGidgPlEU2TO3HGsL
rALjjwK3dsiJ4rY1TldBkyqIpNZ54kFR/L17NPiGdxVwHojXDd3JgbzHv+t8
aC0BapeQfF4aO5ouSWcYfi+Gxqzowd/hHPigobCHo7sEUq80P5PaIo3b3WZf
ceygwdmUzcYsQQIo9Ho5q62yAhy/3jQ19hdEk+C23QkGldDuYfBfqboggrNH
8A3hSti4tE/gyC5BXAvvyB3RrgRNzdp2id9seDJt13eHW8VwPxRGSKdZUdV4
LjtKthjcWGTNQx+woWkXD6NmQzG8ixiuGaoVRe93rgn+sVVw5/21becPCeG0
ZfLDXU8r4axq0oJRlyC+soPohbBKOPXnitlhPyH0e//X3fVeJciHF6qefC+I
9o0n7jw6XQllnyNCXZ15EQc6P8geLwPv0LcLS9W8eIAte0fP7TJ4EpkUrvSZ
B7v7BN4umpbBzQatrWOh7KiZ+iDS+lMxTBQthq0/FUT+BUG6F8mVsI08kh9r
J4ChX59pLWRVgEJRfa2liSC+cD3rs0+6Epa7vnKrnxJAl8FUHmypAH6QSnGU
l0SL9ycfRg9TwWELZyQ5ShKFHl8MMp+hQsTjYs2TwxL4RixYsLueClSHW1t4
vL6DbczhUHfLHFAfCDOJ3hDClNz2IQNC/w2k1q6EG4ngvWbV1MphCszy5StZ
zAmjlrenYgOR3+nW/mpVKoogQ9PaYf0eCrjpjbK9iuRANa2p5CcEvv8E6fd7
N7Fjd2XYAjdzCUwFjK+vJHMgu6bgU5eBEljNcKqYnZTE87EnjVeJvHivUj80
0YLoT2tvwFfZSri/7UZ/Awphe8L1i5JdlaCh+Ua6lF0I1y9X7b9GqYTIvwb3
0oyEcMsEe9j89Uroc5c/VXSUDS8HawfePFUMoxzn300ssmBmVO54/usiws8H
n97lxYafHSpK5ROL4Zff6T/Uc2J40jgrRm62CrprdWRHtwmi6/6v8iEalSC2
dDnX3FIIWz/utL/VUQkyXR7uuvxCyF4w0FBfUwnBkbGK74j9LUozbKTaK+HC
+3PVr+hYkb1Kw/vPQhG82zPSJXOGGQ1Na5jSXYqALn4lVX6ShdAvNxenySJI
9qU0bjCL4bpP1H5vGuFvOBO+pP8SQHvZ7N9uqxXwoFdQ5dWEAL58r+/xZK4C
FnqvPKo1EsSfcm3ToVKV8G3/1WSb7wJ41vGQq/vPCvCkytW6vmXDft67j6Ct
GNzLa7cX87Pj+RD5axeGi4GUMOb60YAN878acJkfLgZ6FmuRc8940HxX+15+
5TKo+RfT13TJCeW/aMznhicCU1zJedFSZ3wibs9RuxIDq70iQrF1zmi7ZyaT
Li8GuAZFXv2Vd0JzXZWuIesUGJF4P29Z44TPX6ffYSlLBBezGubxd06Y7tC0
LsGVAJw/QO7NG2cMXTvLekAoGgZvGmZxuDuhVeBW9n/uyaDN2vm6yNgZjVYb
f5boxIF+Fy2wx8kZ7XcY5y7cOwpX05fl/4w64o6tJsLFGqlAGcz88dXWCa/v
ZxvSLE6G4loZG98zTlj+ojarRjwJUozcB5PSnbGl9skAQ3Qs3F9Omj591gHF
VaNR72M6TLf8Oetw2BFjf7WFL6ungfVva7rcVEdUfy45IvHhODCn6DlIcTrg
AW1eteF/J+GA+qLfllQHnFUdurJhmwGLV/pcdHoccPjXhTzwTofmwYHtKs2O
2G0vtsXsXiqk7ksY4r3kgCF3evcdayD2u80bU3rQEcNcrM991U+DQarKEUZi
v6Pjz1p0Px0HE7++zZPiDliy0p6+s/8kRL9NPUef4YC/1MI9DutmgOLZvSKJ
vQ5oIGWxpXdnOhx9/7bvaZ0jTqybnqr9TcwjPfrC/vNOSKei84kxNxHGkubz
vpOd8YBJw533krHwqtLp7+lqZ3wjSlETuxkD+JIav1PKCYv1rrd07k2B86ea
OFornJCPq50z5VYiCIV1H/4544R6t1fyDxsmwMWDfT7GL53xarPMz1mHaHgR
v5G/28sJt6iepIvVSoY7m0pcfdAZa9rdSUab48CK62imt7szclXxqRlVHQVr
KYwpfOqIb58d+36bJRW0wz8EmW91wui5KTePI8kwLuSsOJ9PnP+m0cvZlURQ
zJjSqct2xhHPiphLEAsqqdsCBUyc0HbwjM3fsWS48MvY+bKMM+4vzXzr1BEH
157Qhq/rOmOYRfZK8q44CD9namJwzRE75FU/bm1LhbkzznxNGk4ofSbO3oEv
BbL+Bv6xi3ZCznk+/pnKJJjP1vs6c9gZS+bPf4n6GwvMn1duiAo64om5JVEu
/RPAtGXiz7cVR3zpqLPF1OMY+LuMDO9kdMJZUa3/5JdToFHtAgM72QHdu7b3
3WLMAEemsW2z9I6ovLTilhR9AtZqFdOi7Ryxl0hmzrQ0OKLOEcdk6oQfpMJ9
Jh4lA2vzm3aJMFl8nzK35QRLNSR1mCUu1crjAyf25ycI/3fSN1tVjmSJAugx
LyecD0vmHyZwOyKT/xG6/GESOKabysnby+A+xTs2zx8Q+er4gWzWMVm8H3/m
xnPCL+7rYRpqvaSDhlXyW/a3nwUNRbcjpEIrfC7T6B1bQwJ93/ntfHTSuKwV
OKS7lQZ3Exgj2XRl0aGlsap6czVQfIIDxGwtUDP4wLf3LfmAPtGzFx0AnQ5Q
lEtLyRCZve2r5UUJHJxTMhmhUiH1ryFt605pXHk3tvgjmshT56645QdqY6/m
kbQ9lDIwvBTdTHqHKJqpcZIhhQTfFnfda1PaghfSNB7NGpeAxuUfnlnIizx/
L+1hSiiD4R92knR1xji98Pa0ztFCSBC7dG+l2xQVJ2iqBx4WAMMPHqqTJzPu
KP9jtmpQBOHmTIVPb27BvwuLRxViSyBxL+0742kljKoWdUqwpAFfQfozfysL
dK0wv2rcRvTT1tmmR+hXmeePc7mEfv3xNHaNLuLGUMZ8DR3DUjjJFqnE22mI
N/SurCf+KATT/XSy/AeN8bgp23LgqUL46ma2fDOFDSUemzc2ZxVDwAmuVQdr
NnRL/yu5L7IYPhxlWXUWlkeL0yIte4l8mtkb22z/1RSlDgSkmHYVwL20IuPA
TbIY9PP1u4l1GozFLh1bNZJH28juHVZEfpjTrL8s726JGl4ODl56+SBHGxvv
0kAUsfkjXfmeBHqS/+7SvZDGz7wXt1+9RIML8vm984Gy6Lzis1rAXA3B57uq
9xzRQV4dJaEc1lI4W7P0ZWekFZI6lo6M5JPg5LNTfq88pXE8cZn+TCwNflx5
JG+eI4uXPiT9O0/cP6a29yKJcRaYWconNlKeD6oLB5qGjxN+9n1ZpFY4GZK1
T79S8ZLE2MDN2w0mqFBw/uZPv2ZpzGy/zH25nAYHtW2tJAq10Th4tnz3tjLg
6ng4doTeCjdlhtdVJpLgvfLzCLYOKXzVb2gbYUrkUXr93DYeWRxlY/pUQFcN
dEwP4/eaW2C4TsOvyuv50J7vypzqDMjZqOgdUUKGHM901/4gCfTsSO8KzqLC
HRGt5dPG0miv9llwcT8NjowNuFK8tNG60ySsvKEMitZG8/LfI3KekfN8lUwC
v89ccqPv+PDsx9DE2zXlUH9CnSJnLYyJDnd8hJwo0M/se1PH0hSvLmvQp/8t
gM0P7UPofM3x252zlAHpAoiqs37SeZoHLYMKos5/KQWV2FT188f5kU1miCWQ
pQL8RSAnu1UVPSImVMMOVUHYqQm381OWmJ+0q435Mxnc5yI/JhF8EJMVaOT3
IBnUZgR/sIi7YNa1Fxw6jZGATTHLS88dcYqZahK5fAzYxs98vHfNGXnC8fFl
kxgo+6WlnbZuj8zhCsYDNqfAWUIyh+2JI6bzZBc58qTCW+cct89L9ihMXXg1
lXYKEi2ue266TvDR1QcP7zalwn8aUv2fdJywNzffQfxvMjQNbRw6yuuCTPtd
d2ktREJZ5ff3/TOO2JNzwHZPD8F/5ASjyG5nZKYL6NFfjwYFMa+PY72O6Os8
dUrgSCo83FTD50VzxvoAfuOMnhjYbnDHzTHbAaU2/eH2FcqAyufdZSf3OeGJ
WXL47pUkqI6nyXuz2uDx9Tu3P7eR4Wv2ZVtWqg3utV37+a6HDIZdlm7j9LZo
/Xlzk348GRJfOgltiNsiLf2RQacXGTyTnzQ88rPF06D65uYPEhySGG4M3WWL
Cpe/8S/Sk8FNKfC/MLBHv8dyTYdSsqC3L8iFp94aS7cL0ikmkKGUFha/19QG
J25NCv2+Q/xf5UrqVZoNduXm7NhK7D9347LzVIcNDoeRvxkQ59NKeM3/9IcN
thQxx02dJIPTzBiT8BcbfHrjP56DOWTIjy46a/nEDhc81T/SeWdDk8Lsus80
Yu2Bv3rlx0hgdP7PY+4QK7TeftRTJ5cEgxkXOl1HrVBzW8anX3dI0MW8knpw
3gq/2CxI/p0ggd2O4I0WEWts2FibqdpEBp2gvOsd/NbYHpUhkE7kUcbH0boM
MzaYI6pz6mI5GR7d/33Mm+DXJqucli0Ev27KH1op3GeFRxvjTljkkEBcqzxL
+a4V3h7nepEwQILzlA23zW+tsF/fJE/zOQl2edec28lpjXvO0WVZEXnfP80m
LYjdGlcvOUpOEfOV2LLUd6XdBj8364Z9uUaGg51Ge0o22eAh9vBo22YyhMgu
PvQpsUFptPQe6SfD5v7bLlv/2OCmIVeaWxoZYmjvo+L5bXHt4bP5kn1kUN4e
3pCywxZ/f7qt6cJEBqVYpmIHF1vcs8NZncpLhhsbsdfu69njji8srcevZsGV
Gk110RZrvHq9T0MmlQwTBpx3FG1s8DLfsRsPhshQvZ3hku8lG/QeLxp70kUG
3c1mFqf7bXBV5GO1QhOB369nf8Q2bDCwa3MuJJOB0bp50HzVBjff7rx4hMjX
rF5Sh/2n7PAE3L1orpINuVYxzL6FRP8DBZzk/WR4eu8pnZm8DU6KNnPVdpOh
81PXw9gzRH+PuWs/DZLB5MpgbM15G+RoZd82fJsMmVfVxfhnbfBAJAPfYBkZ
OizzKswnbdCS1r7DhUqGmoovTvS37fBkr2+gVGM2DH38zGAeZIVjXgOkYwRe
VaaH/1h/sULjh3IBGTMkcJubilHxsMaXnerKs3oE/zHU926PsMbGZp2IZScy
3L1nYspYZ4236vO9KuLIMJuZamxXY403Bim1RtFkkLfaM5wUZ4vxhsHvQ/tJ
IEiJyXWRdcHKG9M+bicjQWxXVuXecSdk2hUY1hGdANt/OCjPhDtj58j6JdWP
sXCh/8aaqgNRt4z+C/rvKLTGn+pq2eeCu1ydQ7PHw2DvYSU1pVFnbGN0DbC+
Eg3MbdKbizKcUKj51B2SeRIMu2ybZuBzRhadpQUXrnhICD1k0b/khI+D5iWq
XsdDf/0GXQGTC9aHBqW81o+Cw3IsQmvcTrjkLelu0ZwCn0L21Ta+cECe+v8M
JjdOgHitc9yDrY7ocWBJbiArDeL7uxt7dBzx2SCDeOBUGsg8YBvmBSf8z6+z
z+ZaMiSY7zyRIEPkHfkvNDrPFAgqv5tg89sBtx+dUJYvPAFGO4SYWtwdccjh
3dCrxDS4dT/qmxY6Iuni+ubUq2lgty8qY9jKCUu+6Akl1yZDrwodWUXCBQ/6
8ObS10aCzdVUo0tPiDwkm/D19ekEWH3S2RBz0BnNlI6KuvAcBVbGppQmK6L/
y6RYWDsKm4V28Bv6u2CItb/wDaVw2OLM/yTwiTPaUf1YmDKjQSDFfqgpywm/
cv+87iGdBCe5eaqMRZ1xgEn7g+B8HCye+jFt/sMJs/pe/XC5FQ9KbF90n3O4
YNID73oKUxSMuDD6SLU54737yfVStjGgv0QfOxTqhGOrk2vcg0mgdXeHe/Ma
oT9aHyKZS+OhhySi8eG5E3Yy3f3OHpoAJ2a4Q5y+OGNV3sTq6EgUHDeW2llE
+PVDf145XfyeCNpWrH7txLzCl5QKHxLzaouctg8j9McylZovw5UKIt/v/I1q
JfRhOsnF8XYqLEvV2HrdIfw8naWzzbME6E84tktF3QEjgjuKlU+ehCmpRLcA
Dyt8XPDjaEkmCX6cDHStEbbBiuNMkwc7yXAq4qAP5yd7PHHkzYRmwSlwjaO9
TuewwoTXBvXVhJ/4ZCpxwOO6NVJ/3PpufIL43v3ZFk9G2eE8q0hv+UQO9Gue
rfiPB5B7kzJTXh8ZtJ8VbD35GtG9bbxmnODLO2VLYix9dlhRyNmRXpkNjle2
Mca3AmbyW9HzupDBMqTidA2x/tyNW+THxPo1n83incT5EygLEbMnTkIunbAM
7y4rnBoqK1Qhzk/bdECXldsGv8UtOL9tJ4OEVdPKwKI9Bp4JuLF65hTcz3wf
H8tthTWfffM7iPPH7lK1Z+y2RnvNuNuRp8lQ1vSBQfaxParkmMVd3pwJS382
O7l/QwwL83VOTCIBh+qd7ZI0a/x4q8KdHEnwa6eW7cy4HWpJfikots0G5cs/
Z1NnARu/OwjoaJDhiUCgyI9Qgv9/M7ucIZHgermbt5azKer8KS4NXi2AOqHT
zaMtJlj+g02MU7UQKP2jMU+LzPCVxCD7lsQC8PoSHL5YZYlqtkZ7LHny4d/b
2+8DGAzR+aNnxQHtIrj7VnbHvdcGWGY1vEnXoggaWy7JT/EZ4t3IH5VTqkVg
mPJ526oE4sl97x7++EUCy01PHG3pTfHscPK5LO5CEDt5aMjbwASd5m8dattW
CAsSLO/G6c3Q6d6SddC1AmjgXA3YvGCBS9MHnxwKyod5r4MVPWkG+G1VjjU1
uAgkRDjPWOwxwFW5O0x+MUXQYvj7gSTZAHNvULt3BRTB2pVQoYNegOnDNW3t
hF4rMDNK8H8xwuzb09/vnS+EMqexL8+OG+Kv1EO/tjAXwY2fS8YTzMbYcdlW
rqKqEOKWc3u3HTPF906+FpHvCsBDvb72x5AupqVuoYz6lYBcAv3finpdLJO9
PBqfXAISqgKFKU90MVaGjnJpewk4hb7NzDpkhs1mqXunswugMY7peIi/CZ6W
kBXIsSmEL4H/PmekGSHdzKLGpZ5CEKpMvfnkrjHB7wYiHEcKQU7L1S/9oSlO
3X/CkzNSAAtpK+EBE3ooWO+UsXlvMRgcVb20eFsPfUSUe/WPFsPVwAC5uld6
qHPs3aKPXzFUPZ/qipYzw+L672VJdYR//e/ulwVvU9wuwj/p9K0A6B529Ta2
meBKdfHXRJVC0Muf4z2bb4ZuGY1NR5IKILKs97d3AZFH15vJXYL58CVM7Jg6
gf/wt9ixRAJ/QYYdCv8R+IsKpDKoE/jvc34cvo/AX1Rg5jazWhGoMAizMfAg
kgz5CzQJvdcJlhz89NsEpUcOlCJfIYx+T2FgMTLBSh5ShwmBf5PLS4PrLGZo
yW6hJ9BaACa1D2YO/rTAlRpXJrnd+aDhzetenWGAvnb3qiGoCBpWPi3O7TVA
jya2f4rRRRBwSm+vSaEB3i7lcmHYXQSY0qxjEQHYF12qLpVEhise3D5ZQybI
X5jXQJMrhHexz58k/TNGVm2bug+7C2ExVTc4lJj32pqZfDEx7+dnHjqVd1jg
v6nWoHuJ+SDm9CvljLMB5ns71b1LKYLJP68L3ykbIPu83gRTXhG4n7R+wupj
gAGbdyRoxRXBcwUm2K4NmHymNSWrngymfdn42NMY1XzLTvefKYSup2wBR5WM
UP2eE8vH54Xw8HaXw44HxmhLgxSpw4XA+LFb8k+MGb5l3nUqLbMAzluX3/9z
RA/zsou+3e0oBpsXJu/uuOoh65vBKyzPiyFr4u9xpUQ9vBOjn81+lcinDjcc
/qswx9Zrxewn6QvAN8HFzqJLGW0mWbx1aqngIzogssdZHZ8LlVj3mVFgXPzr
3OIUIkdfamAT4V+fbhrkTQk3xsvRWR49GYVwkCkl+BoYo7CMA2MZuRDuM+gG
e+42xRdXY2ndXwtA9Kfer3RhA1Q40N+uVlIEHWs7AjU9lVCh8LNX0U4anHuO
/UfqVXEyIDhrIKIKQvnoXbjsEZ2btBmTHpMgUK2TYcHBCFW1vCvcHhbCFrGI
5mJzI/xUdKvU5UkhDDOys9D0TTBb8tvIe+K+zJxb2XV9UQ/1+g6EFW4vhlyG
H2Sm4zJ40iWI68grGpQtHaOceSSHpW94Fzj5qsE10G06hNEco8ckTXc6FEAv
i3Ny3SNdfGkdef3sjhL43LHTYoFTD/drTS9t5i0Bv8jq5o4b+ohZHx/tvlsE
DDdeiW9/qYnadTff3lSqgBHSrb80C3mceqAcxkzkd4n/QrxVYxTQfdnHq2mZ
BuKufkXtF0xRfC1mr/wL4vvtLfkx1KyDsk3b/qVfPguvn1lYOZ/RRcNUs1P7
aCUQ9bOMJHhKD4e3Hj9Rf6EYbF/nNkueVcfSki6pRDoKdEtvefkfTRkdPV8c
UbpGBb9ez58pUurI/fib8xd/Cqi6HhvXvIOY82vGaTmDBJybVCX3EXgJ3Bq7
1Ujg9SYk0tFJ3Bhl3HOCU8oKQTaT48ppDVP8/g9KVekLIeSOY0nUe328b50m
2tVUBCUTycE/jyih+4qfzAsnGryxwLbFB6rIebRW186zCpg+cx7a5Ie4pDp0
saGbBFyad7haIozQ/6fb5t8DheDw9/cHTz8j5DvKFG9+txBYm3/eZNptgvkz
1cH+BP8lJ1K0ngro4+6v1ityusWw6c8FZr/vinjx76/D/Mk0UM65/f2Ruyoy
264nVF2uglTpvGEhc8Q4bZ2285MkOOlsYeqnY4RFXVEVdmOFoJb5iJ9B3Ajv
0e8qWJ8shAcrjrvHJE1w5O+o7yaPQmCY0Ah6QvDnv9fGA/WBxfAq6RB15r4s
7ta9HZzCWQ3IMdXSTFXAKK+21bx3NPjPzGcgJNMC27eIuqsV5oMzhwjrur0+
hkTZWr7gKgb6rZ+uGu/Wxzk+jhvcm4rh28/AFiFdQ7xgXP/CV7oITmbh618f
tFHon+UFrrulYO4j6KmSbI0qWY8mB3cS+eGgSYxCJ2K7r/+Gy2kS3P252flK
hiXOWIuQu8XzIWeAhac3zBp1+3ijahzJsOY7aNa4zRQfweLixM8C+BnPyOwb
aIauUhd+XCEVwMRVT/6XFmboPmU5NE4pgNbKAfn6OTOMUGdm/uRRAJp9rWnf
7K2xw6Bl6K4SGdx99Hd170Vk2XaS07+DBKwWO8KuPLFAnrCAoZDwfEhhC6q+
t9kaZ2VJpPYvJFC6uaYg4mGCmedtGy7aFcLnQ4tpv/abokC37pvdS4Q+bhLQ
v2Vlig30GvMua4Te1L5jmPtgivXkicH47gJo2q+ZmPkHkSl6IXqJ8D9XWsyE
JnZb4KiYLVNRbT7cNkpoDwo3xZaIKdWeTwUQ68W+bZcUYsWrN4rpP0lwNTZo
1cDMALe8CPyseLIIXIOrDem3GuK3Zsdjl4SK4PjN1F8HpA3RyqT8RYxiEXB/
rpQhDRuip/CYd97XQmiRqh9mPWqFR+5zND0vJEHA7gztX40WWB1k+vbu8XwI
e/f6hcGIKZa/LtZbvEfMr7Fo5D4Hora919QTViKvTm7JDxjVx372yMua3UXw
pXU61vu5AZ6u8C0kWxWBTaR67akawn+8EXGneRaBo3pbnaO9IWo3nAOSSBF8
7btZ/TLVGmudz2w88iTDeMDvifhriPu9iiwPniH83ZmUnrl4S2R+5b3rp0w+
yPlIWdsEEXm05RM8ASJfk/MCnTRNMX6np/7CpkK4bbdbkhvN8KnhUb7lygJQ
KKuR6RA3Q+dNR/JUGgpgR/dC0aUBM0xuyp09HFwAOJdnzk/gz/z+5h12Av/T
LbesuQ4i5nk8elh4jQTv3xocS3hlgScWIi0DDubDAv/quwUOa7zSf1P+E+Hf
CkY7nlyIMkEFketF3haF8PzpjFdahim6rkb0GM0VAMNyyfhCgCmW0YVm6BB6
8MTQzGUTkxlqe/lxKrQVwPrtlpJzqtZYOvvg8DAXGcx/0J0l4gFOw7CY5gPC
/6cr943XWGAB6xUfgVP5UFAVefPmkhXOedSVChN5ONXhioOPrglmrcTU5bgR
fDK+dV3f1hSfmtl/if5TAFdfDfWWS5nimbuKgxNMhRA5m0hrGTLFNKVr8amj
BZAzYrG/yMUKO/5e/pRP8KMyQ3TV+x2W2FWuZJ+jmw9z3o7fQvaa4YJI0rwl
8T1FPWFF5mZEvh8RT1WIfH5BIO2rSpohPp4XNVxhKgKFSeFf/QVGOGJFm7Xu
KoQL9u1+9oeM8K/OveTqwUJoj/Q6XMRtjG6+kQ9CKwtBNOKDSOlPCRRTZrT9
fZMKZe/NC/c9l8aiDa/7gpdoIFMqn3WeqO+8n7ytSdS6z/JHmh5KY+9AxGWz
Who08PgrWlKlUFBaNjJPjwYcI4w1OtoyKJ2jv/PXEA2u4Tjdk1gZ9Higalj0
kgZ5p+/GsHjIYGt6mr/PUxo8Wr4tKHZLFMPUShetUqug8K60E+usBP6WfRJ1
o4UKai1303tfSeBcqquAK1HLz6fMSFdL4NYMwdEeChXmTu04Fy4ijjSud5+y
uKjAeTOF1T1bEmGxVq3xHRUk2f4eCtgshbEDVK8+VhpMvGK6lNUsifyHL/v/
+UqFjvjcd4niYpjHNvRI+lIVeAV4pu15KYFMl32+6TdTwePTYsSjFxIoyqqq
F3iVCsx0R+0n4iUwvOZPgAmZCtlGJU0TjuIY3cMv90qGCuJcbqaTxyTRSIPD
ePkNFTI1DnK7f5REp730NpfpaSBSzJQYeUYS5de1RQ8R5/PMjSrZHiGNc8tW
ttLHaaBpf2zXax1J3H3COqx1lAo9ptUdRrKSuKzR9/f+EBX+vVihMB4Rx362
Gy+stKjw0tnezS5HCg2UfDWomjR4ldY//1lPEhu0lro87lOhrb0hme81Mc8C
o5McrVRwCt9x2oFNAhMD92pYHKKC7qJfjZKuJA7v9dwxQux3cJ7kXP1BGkUN
i+tvNtHAR7phtZ2omS6LjvYS9bZ40zDXKWmU28d8x7qBBryjddO1D6XwhO/r
cx+ABowePHznrWTQ2f7d3ej7NIj25iDfPSmDZSM5mzfN0uBE0OVQ8SAZ3Kq1
OpX2nAaHtrxtkFMVxQnGr58szavAYVXgz7ZGcbTakaxs5UD0+13qEU+9OOGv
9+3msqdCXug2vlJDcfx1ecxzUpQKB8iJrS+MxPBRkPDhwbYq0FjSuLDNWQK1
5v/ru3icCt0vjGNYmyVQZMdDK6ZzVBhheZJs6SiBDCRJx+VUKjw12thteEgM
6X/cZkkdqYKTvw9Ws+cQAfHpYkxbCRXcd2TNUzIlsIttYM2gmArCzofJt76J
Y9Xw04P6e6kwH5tyesRJHBedIg6ZylIhhV2yNUhaEnlUM/hNCbzKnwsuGydK
osN1do7c11SYaNs/HcMgiXVc/m0ht6lQl+p3c31cHCss1kyPeVLBUb5wJltA
At2+nT5vEkYFSweX+XV2CdzRZF7zgsDrxDC//s6vYvjBYuHEnY0quO93jn33
M3HMGdxwPeNBBdH5fzvvJUmgTpjYJ+N8KngH+YsdLZbApvUtjC/LqJDwt7p2
cFEcdXLKJK4HUEFTdOu5hyL82Np9iOp2pxy4jp44sbmWH913DVxglamA1nAc
2OPJh5rOty7qWpZD2p/k1a8UAfy+8ous2lsBzEt3bhW+40VW6VNSKV/KwEZP
ltJzlg+9bn0dfxVaDqv8kxpe83xowks2760uB+Une0SPVwijYe+rqbp4Coj5
CJU/LeBESZM7IVO6Z6G4lCU94iIXZqrl6iRUn4WxjMOD51g5MEXwpMCmkhKI
dLoW43KJGznXiuPN7UvhNeVWTrANNwpef7tgsnoWtt4LmOy+zY12IYVf2jxL
wf2dDzdzLzcyXDw7FONdClGDN1h8FfjxpO4WF6H75SB4W9zUZHALDvRmM+km
lkAiPkv69JQDewrVTXe/KwFjdaW6UmRHDrOkobHJYkA5227VV5zY9Ha7qI37
Wdi7cVyMT5wHNUm1khRqKfAesMLv8Tz40fnC7PjbUtjzJ+5NoRsP7rM4LZ0x
WAodFxsf89bxoXeBp4dUXDloTy7cz3Pmw9UTv2O+GpRDYn1nTcE6L/5z5dt+
b6MMXrqsVnJd5MNA/88fjhwtB5HgWRvhUG48O/Wd20qwFMQlXm9l+yyF3y5x
jqc60KB/5xpTobEUsrR8GUwTpsHU1dCC+GUJlHkddYf+BhVUvfbs7nskgMzb
myPuz1RAQ7MSFPzhQxVd2ViNq+Ww6/lRr9RT/AiXPTVxSwXoufrb3DTkQ76n
e904lctB0q81PT9UAM0SD6zFV1eAiviocKkOH5qJsGzEypeDNduh8d0v+dC+
y1bye3k5tA2AdpsUPzaFPR9wHCmH0xpvXqqVC+OXetD6FUcByR7piDcdrAj7
y0uPGRWDzP4PBVp32PDMxNk834vF0OjIsdnQmAWtPxUVphP57XLJkATtAjte
rI66zb25BIRi/jMg5XLj6LlTwa+1S6HS07lv8jE3SpaWBHiElILTgvlqWjY3
Ojyect+qVQpdp+1/X7TlRa2ieT+m5DK4EJg/TuJlQ52x0zfT/IshRk/KM4ud
HR+4dz96N1AMSQZhfWLnWbDTsO4Rqb8ImFKv1jLzsKN5mueC+lAxRMyLOWwi
/s/0zp3OvKQyaN75MCQgmhf9SUXXdShl4NF08KIUJy8eYgzgUd9ZBtpGzvn0
I7xozanw8eYkUXO6C8n9YsbMsldirElFQDAFG7c3C+Yny136eo7I65Oh+3ft
YEZ7WvxDZ/0ieLO5VkushwGzZuW5s8QKocIg9tbODkHsYYt4fv9IJZS4vNKs
jxfEtOcqmu/sKmHfNY4l0wIB/BDZbPzsZgWEpTe/8n3Kg+6XxpxllcpgoKzG
p/0Y4u4i4f35tSRoY2SesKm1RrGfej52R8mQZU27buOlj413h63WGIqhlrPi
rL+2NYYq/LCk8JOh8G+U9alvgOfeP9wcLkOGo7OM3cdUrHE5nLL0mJMMq0L6
v/Un9XDwskxc8Z5i6JL5z/ZzhxVKJQkZqhH+/gM/cpocAuxZyP5yMpUMX2f+
MV15a4WRI72MTc9JkL522MrdVw+Ro9qHdK8Y/NasN/2IsUKTtCZRf8IvC/bf
vmhDb4LODDNbZ/0LwaKh6PA1wq91BccZKxB+zdNybWPBQhuLj899qHlWBte2
qPxq+m6Oa4aN/z5N5MNwR2zep8OIismFrLdbSGBv4et0rtAahUdNDo7sJ8MN
3fNz4xr6+Hb7+piYTDH4vKQoukpYo5Opax+FgQwycmmvbwgD5iVTL/HfIkMQ
4yf2tG4rHHjcRtW7RYKJsGMfvSz18MlM+umAuWJQMfmx/9F2KzwvkD4rc4oE
65S8OZYKS7yUIXL3C28+1ErEtbamWKGQ50MVn7MkUDBmM9Fq08Ujf8KcWKJK
4K56jUs3hxU+jna3PUfkFZnhSIFzbuZEqNt+KVehAJxP3MlgCEB8tLDWa0vs
36i+mvVZXQftqW9/eQSXAltS9ePSD4BNPf5n5JXJEL1HWEIoWx0HTfNlv7JS
oO6X6FyToTryb+LTZHKhQOOqbzEtUx13sOwcbdhCAbspkvHaVnWUcKv93mFC
gZ21OlavL0njuM+9mltnaVB/qMqiU04Gi+PuSK3004AfbErYyqQx1NbtGWM+
wUejsddzhRTRQlGYLE34Q+3jP6VaxtWRK1NoRPJhJfTfkr+qF6aOMu80rMql
KXC8yWptaVAd3RZX9C7+VwnGcktTpafUMZahjT6JgwJB01tpOdqyeOl43J9j
m6uhd9T6V9NlWVxXa+Rq2lINK1utSp6KymJkxo6nRzdVg9j7BT+vYQUUD984
5jNFgz2svqkHb2igpIjD42mhSpifvfA7z0kD81iOTSlGVQK14KFG6gUN1L8/
9ddVqRL8394sTNingUcUjrr/9a8EhY8WL30d5LC9B6538laD1Mudogn9cqga
eH+7CV81NItz3DqgI4cnHOWUgHju8KuOZzFVER//uZmXTPhnroFos9XPulg6
8EZJQq8E9IW6/bmKdHHB+j3PoeIS2KXbn3j/gS5qaRb/ytlVAoqBn2Vyz+li
AY8Vu3FGCVyhZ9Z63aWFj54J6AlHlMOKN/c9BRFtDNQTEX/CWQ6dHps3Siha
WLk2QGnNKge3d/6D99k00MC+b6jpfCVEPKF/7TFB4Nsz+OjR/Ur42J29/iZd
HfvSla0ruCgg3Om2xfGZOjo3fZpnfVwJwtn29FvL1bFq8x7R1fVKaHmzXbHh
jzTWBWhailwn8sDZd2+Sj8pg3s232wYIv3/6Z6PFtwVp9Hvxkkv3Kg2KLqT/
eOiriGc3NnKCW2jgZT504elDDaQ/NXu4g6ESPB7/bUj31cCibYkmEUGV0N3q
Qma/qYEWe82o3gQ+Bt8EDdliNdA29/xS17ZKeFOffb91SA69vjn1qRPzVv/7
7FGxlTx+OvS7f5qrGv6ZrKjuviqHHpJHlIOJ5071wwP8oYr4+mDr8uFGGrz4
fHvg4LQmNo53SP9TqICVZGHFsv2a6P4lwpA+qwJ+Pd0prjSoiU3+9nc3mVbA
Dx9N4YA0TdzWqMvdH10Bg++jmn1eyCNXUaXzElM1aNvJfPbcqYB2aUwk0i8a
kJxuyeT0ySN1hyQdjaUaeq5YMqYGKWHjU9P5BVcaDHUX1Yh+0Ua+hn0Hx3pK
wefAjwHhOm30bWM5fEujDN6/T+iGl9ood8G7eXS6FC7eOd8vcV0by5mdzPiF
y0A67izptK4Ktj87tKxE+NHrrSwe5xtVsHA0b/q9IBW23z/9ul1YBU+cybW2
jaRCo9QyaaSPWB+QPF/GSvi/mbKNijYbLHljnpDVTgaNpzTrr9W2mPh0lvdF
MAncBQPZDVps0UbbqFHLggSXG+wq/bVsMOPmzj1S/WR4+ObnnvUG4n0a4+ql
TjJMjXPtL1q2wRcaEsX/zpDhiun3N7KfbTF8PNk5vDwPrrWnB3sftsGNexYP
Xt4lQ/eXP/x2221R4la/pQwbGVw86H+e2muLtUfd4ow/kWBqBSVj563x8e6n
V/hryOCVVF7BtJvYn0VP6jHxvsqVgTG1Ghssd6XfuNVNBgnfv96GFbbIqDm+
cD6WBKR3PaltKjaY8JUzPKyXDBeqAsasOWxx6yrDw22HyaC829K+XtIWo7zz
92Z7kCFttsY2+7w1XlSuH/weQwapVxvLUaI2KBU00SbeRQZa0ZjA7gAbTCMt
878i9le8qFU342mLCz/rv5T8I/i2nZIeImiFceGVbaxJJHh0LFUz/54V0peo
hMTcIcHs/AW+xVkrHD7+61fVGAmWw5KuR5wh8rw0q7IPlQSJxxIi+RcQqdu8
VeuSSWAbFDd9TN4Kr9TFvwkhaon9uxgqmK0xxz4j8O4KCf79PbfrM9UG/Z4T
6txDBlVHgfPeubaYE3lMkL2YBKHDY6/LKLYYXHIyTSCCBNdLQi+2EP0cF9vH
a0D009HZyup/1gZP1e1zTSTwnGuXzvj50gZ/us3kyVLIACJD/EUvbNHpUxzT
lbE86NzYXodCNri4J3JquoMM/CPhHiO/bJB+vfvLm3QybBz53nua1RYfNodf
ro8gQ8hx9QfZ+dY4ssWmVjKEDBXHg/XXGG3w805b7T2tZBj0NQnf42SD1onb
Xr8cJsNS/jnlYrTFoI7ri7LyZFDfw8Q399ga612Tf9gXk+EQk0i7Q4sNxlu3
NrbeIMNum+Rq5gEbNOKu3v/8ChleprvUyTpbE3rvn3lclQyOR7hGU3usMS9D
0Copi9DrA+kPZ+iJ8waKUuaaifvwcVFV8I8Nvv5PM/N0Ghlq+7WPDK5Y4aAQ
bbv5GxL8/KCREzVkjerLJWtOeWRYHuw9UjRpjfN7CjNflJOB7v0Z1qlDVugh
+IxBiESC0n90uzZNWuGh58Hegw9JkNnSuKgqao3fWj4o09OTQWy6r32ZnTi/
mLGzyHUyyJ7tyMl0EsGpbUazZY8pcPU0ln9tFEElhWkOxU1V0LPp0RP2PYYY
e2LtUSRPEVgU8HD3r5jgXiw5WihQCHDBZfR7sCi+m0nzN/aqAu21mk30QWK4
y5kp4MNgFbxcMnSTHlfAI+kj6x0vaHCjhmteXM8c499ahtboFoBL4/6jqXzC
KJrHN8OlTQHrqLSV4QohdJ6OPzz9uRJc1WfJu6QM8IfL4539BUWQaKMs++Ca
MR6ce5VwNqoQro7tQKEiEQzfuGRa/50CA4f9R6pXRDCKM+DnDtkqkKgdm9ye
Ioe7Z3hC9xP8y9BodPHeN1N0enltDDsLQJt7rujPQREcKoi9Iz5LgWOFehbm
RD5sbchjP0XkQ4EgPiuHdn18Plb9Wu9eEQSvOmRz7TbGfNk2d42sQnC7319O
YRZD3TSvPg1aFdzNPKPmqSmGcb7v/926SsxvsLl1nUMOBXOWKgx5qsH+ydW7
H86a4iO2Wxy60wXASE6Utzguj+fmWLb+R/gFBt9FDet6WXzmZhN9hqgv+S8K
jmqqo5ito6O0OwVcf1uR2kx18VXiwnfbtRI47BvSnd6sgFI7B73U3tBgpe9m
RdwlefxeHBXlxVYN7aMLb16cEMYWq7qNoVAKXHoa8F+arT5+cuq1y+QphqkT
UndyekRw//lPi7xsBH5jkicZOUTxn+lw7DXNKnjcc8M/x8UQ/Sj/+h4JFcEz
87MnQ+dNMK5CSXtKpBCWDr39zTUnilEzr1NHyFXAwevat39MDCMXktfgexVk
vGErTrqvgEOLu+3oCT2WTdTiZpY3x6mHepnHTQpgxkjrlJCeCAqcrq2IGqRA
+7djMR1iwnjwSbpWmj7lfxVddzzV/xcmZWRkj+zsPa/NOcZVqTQo0lBUSKqv
tGiQve60rnWlhMiorCQlKUpFKURkJpSorMbv8/vz/Tr3vs85zzmfc57n9boD
jrnejHyzxRStyN7HkT8FvvfqbZ+fM8ffjfbqjHwGnDgqfPjy9FpU4i0yGGbm
QP/RWIcTA0T8f4emHyfngIZkwbzWhnXodiEigroqD/gjJcZL9awwjO8vt8IK
BjhMz363VyXi1bMWPVWSA293rnz4plsGixrLIxUlifgFRF0GuU0xu+ZZB5dt
CpASZL+pPzbHk/s4BZ6XMaBLYsxkYVoO62UY2ireuTCsE7TPoVEOu9zsAsxc
c8H7culiOaxDwataT7pW5kH8bHGh9i9LrD+ca39OnAE19zMiqzSVUNrhfXqO
NxveZlwdrf8oj2oxYumbKnPh0N7/SlPGjZCfJ1qc7JsG6kFpybrdJNzrttT7
AZmwtCn7drOlMrqan/n1t5Xgt6yrA93VSrjl8FiiQTYbKkJPaJy+r4hZtZu4
XK3ZIGdd10pbMEcl+w/PA68yIP76mVFwdkRtz4F2L2L+7XgxqUzRJqP9UExx
yrskSF8nM3fimwNurpjf9eIGFfiF+neHvXLCpXP7dn+cToagovcHM0ocUPNh
zSX+UCpk1W1vlE50QiN1V5UXhH6QnVX8RtqCGDWtcUu3jQK2ax3vHhZxwHbD
LW5PlihQraVh3GzkiFVT5JrnxPxXOXi4Q0eSjFwLZzVl1ybDt5zenn9MB1yl
lXCk348KfMYLZYP/OaHgwc9C5c8p8PMMVZy+xQG3+OSvCtSjQup3pfcsHSd0
iGJuanUk5jP7WEallz3W9iuXHYyjgPHizBFjY0d8+OzQywnCX/OPou5aDSuM
uHTTSXElAwbOR3G/cbfGwEurJk8y6VDYLCeWKW+DdUU7rwTY0OHNqb/7h7fb
YFCrK+WKKh0+LOvIyL21wYKQ9zonx2lwormtXrLZBlP+7uHn/0YD22cFpdGe
iNcF3taVPiTyfT5UEhZhiU5s//03LRjQM1L/hV1ghVy1zlEv39Nh3PbIloET
1ti5bQIs4uhwvb3xk/l1a4T9tcgbTIffk7ujVinaYPy9f++bremg+WRP4X1h
wl9YQYmlAx1elbaKShP6yo3DsvYUoa/KZz101i5bIJ+Gu8Tb/QxoevFY6Ze8
FZoI/Ojy5WHA30+O+Qc/W+Go1+Lf4gd0uGHe/+aenDWe0okc1LxJB5BqnGWm
WaNOWaf9wFk6tC5vfhgRZ43mXyuYvRfpcH/soCZ9HyAb7h9WjKXC0reqz17F
pljPULJu7GCC3APH/d40Eu5R3PD2xT4mTFU4nHTaZ4ZuVbHcK0WZkDMwzhtD
M0PRky/VxzmZ4EbNntT4aIbb4ze7S0wyIO+krtOKXjP0D7KpcJhiwNF7RYxw
ol6N2hO6xkS9OP6+9y34a4kxWmtlakQY8On1ktFXHWuM4G2SFr9Oh/A1x3NK
fljjUu3kiZeudKgeLPD9oWmDp8ICPRzM6fC98jdzT4kNZq0tv9WwRIMnS4bn
XLJsUH2Sz2XrCjroDIbtP+eEeKaWm/G5gwJkS3rn9VcWePOOTlnEUQYMNwXO
yXyzRMi28H8oyYC617/65+ussPXLiUnH13SgHrUU3P7VCnVqaBXe9+kwvTu4
PeCwNd4XPG2WkkSHrFExxWUPa8yub59QYdBBLnuLTacqIDV207Yogp/suptT
fc3BAptezT7ppTBAelOZhKmPJSZKF736YM8A5S1GY/zEPPP4fN3LnZhnLSv4
NA8ftELuuo8LO2aIfOP9eO50W+EI2VijtJkOqfMZkqTnVqiw2vZ2WysdBEgX
f/mw7HBPBb+ihRgNrqYK52WcNMM203Xxb/mZMJsiY58aYY5/+ru3+jQyYMW1
yfmuLRZ4pMDrDk8SAxyLb4lJXrFA/fcdAvcvMUD4EMXT6asFsqYPMFx9GOAx
sCJ7y7AF7mfdVXA4zIALNWbyTLoNPlWqrx7gpkPs3dNLZ/XIKLGBvanqRRL8
MeVftXnEEY9aZpkaplIhO+94ewFRgO9lr8X/NlCAVtp19cl2J3yRtfg3jocK
U4bnS08dI2Muu+VO45dEoPqP04tHnXBUo+2GW3kyyB6+Uqt0jeA7me6Hlxqo
MNurNWJCzIc1UflbvZyo0J+WcC+C1wnrWEN5705S4b/eghM3FMjI+Fjcs/tv
EmSEx58Wue6Ed53WUX32USAzylWs2ccRKRr+IYsE/xahPqyq+OyI0k3Vpdvo
VIgtvsVZ1uKIIRXfnsWWUEHsDdeycJ8T/jVy5X7Xlgy3A65ZyVMc0HvXgS36
vlQ4lnPJlhZij1w8snV5DApIHXPvPFBjj7/T1RLDayhw8rlM/8cSe5TdXBxl
VEGBe9UXuJYLHNCCdT729WkqzPdGf22VJqPRpcL6NJFk4L300yfrlSNOhg/e
CC2gAv2rgjfXISfc51nsQh0j7p9Yw7XW1gn/6en9zNOiwmeyxUiHBxkT698U
uJgnQYeG57bbdIK/Tyt/liXmpe6u+ZwXOxxR8lvZ9zVEvlsk67z2v3XEGjtf
Va58Qi8Fi3x/T+g3J7O4QwGEfntyv9yb/tQJY3JvftjARQHuwUNKHpucsD66
my9KlAo/hS/rPhRwxCcTt3edJvin8JsjBsPJjrjVOXLuQzMVGi7YtwQHOSKH
p0niY8KfdHNIpniEE8pm9CgGllLAQ7pDYh1hP5wsnf2UsGus1nexsXTAbZ/J
iUpyVIi3M6Q8LiT4vs+hjdpnqWB75WpiZLIDBp1OtLnjQwWv601zXJmOmHZ7
p8fmR1T4oTJwwXynPWrXTj2Oi6HAxCGPotYRM3SsWltCmmDAHskNxUUbifm4
8isnc4EO7XEGHjVa9igsal2lcIECF51ipWKizHDqsvZI+iomPBRdc8A+yxJb
92qf/2bIAM31z74qfUXkidAeWkHop6qPHJWz/GYoMu7af0uPCdKH3hjcE7PE
ukD5cnFPBpRcWFXzcCVg5NmJ1+IvqDAYdXa09D8T/B02EpZXlQIDbnvsGhmm
2GUWfWH9ABO+pTtNPEZ7fH1+4MitcAo81h2fKaw3Q2PJfAuunwx4feTzwAMl
K4wK4397mpsBg2YGqZ9GEb2ruTr/H79zgU/0/CIJ6xqpS4amTOBW5D1PHrVA
0f2ZnfcOMSAAD8sPXEU0cjyW4EOnQFg7vT/1PxIe1XL0UQ5kwgNPXsfdnhb4
krRqpXc8MZ8jm1QMxwA9PaYa8on+WqmqfOK2lCmW9/vtajNMgWSdYx4z5wk+
+ZSHMczLhI6gZJtbkgZ4UHG9XPMvFmhd3FBk4KiLjqzH2Tvts0GdVZCgnG2A
DYOP/4rEs2CHMsmHUmmMIhvu3ngRnArp54WvWr9UxZ1Dwqtu8+TBuaRjBadp
qnh82V2klz8PPCsmNhiOqaJpbVF/N8H/SgLV3o7Gm+I900Zm5QgTeiKO0YW9
DLDJhdPApZEF58poIs+HdfCW4MlvuQnZcGJX1i/zKX1s/bouqkUmE8LnRKUu
yxkjdaxO3kkpDdpsRmWaz6liX9rCKjPBPLi5Wu4sv70qyqvnnx1ekweyUU5B
lxJVcd/96WY1gs+vCm+/7lJugk9dU8LlIlJA+kL/5Zp7+ngzZvOOXIdM+Ggy
d1VGWAf3XT+na69B8Fm3SOmjnProdkLG2uFDJjwk8bvvYRmhlOTlZJvnaWAe
sdtDpFQFXf852AUQ+gYvf2AeOaOCemnqwnuJc8jZlx7KDSooRr+W8v/fT/LX
bzFpUjHBnf055sV/UkBw/5V/K6wN8W+V4K8N3Rlgkd+pwdulhdLiYZP7/+SA
x3SX4Zvz2pisOX0hmkboOb72sjIdXYw0N4iJdcuGjImgf50eqjij+m7gk1Ae
tNyq4BVxU8XzYe5Oa4n8JUIUTI+uV0WjxbKMXOJMsS0L/FGrg3HW5o2rSrJB
1jXnB+OlPkbn3yi0Ns6E97Gj/eJzOrhOodtv6VI27Cxw1BJ3McAq7vb+Ey9Y
wOdfw7sxzhi3SxiMR+WlgvXPiYval1SxqOpS6QSBb43Tvg2pqIpbfnze+5nw
x/HJTv9Xqipa7BE7H0X0w2z7bHezjykWvHnsE/yHCdaf9C6dm9NH6e+dOs/F
MqGg8siGenEdzBPodZlWyQGRUfunKp/1sFS5/tafb5nw+vg+mRunjbA031k7
+XcauJoHcszeI/Rlzs/xzQS+v579SymMJerRziseQpwLefYIy7ap4GqH02+U
iTOH1VoP9qgxvjGvmyqzTgXeAwGcqKCP964FDdEfZ8JEkPzL7dLauP1Yfu6r
jhwY+u6Xy9Gni6YVuSTp1iw4zD/qojhhiGxBU8e3z9JBskra53jLOvya+X2z
JoH/Je8Hze9S1mFFCOMRmcg3kPOw7Ma36zD1c05rD2FfiHAeqdtjjJdTXgV8
epMK8qF771nQ9JBmciKk0zwLnK7uD5AI0kQ5jaYpi1e5UOJVVUu7rI0bbkx3
s5IIPHr33qiN0MeZATG76/9lQqcRbfElRRm/PPP2qSb055TY99mwIGV0mbnV
eamHDZ4/dB600ZTxukPwou0wGyi1wxR1siGOKD3XFXiWAa9IvXdA7iNwbqgx
1VGKgcLd734nT61EKcsHz3/oM0C9/GC7fpM5xu9mevGVE/xu3Y/oT6p6mHus
8sE9Shaw6k41zB7VxqA//5jXM3NgZq6VhxJqiMO9ux9sOpUBhRrtljeYGsjX
Vvyl34INkR/87+iKfwXdfQVfb4rHgw0MrqiSXYRXNV0O2tbJwNXyJHAqxQxX
WTW0UDmYwHvFT9C9ThsNU14uVB7KgbWxy/6yTpqoHK6gcmwkFwx9Fa/NJOuj
+AFdTZpfJhgVuv6jSqqhifTdAzWceeBo7cW3mfUDgjjMayt2J4JviIOXzb4Z
EOzcol+aEw+aF0StRsTNMFCpTe6yNhPe9nC1v2vWwqqonq5inlwwGZCX32ys
gXSjvheXfdgQTkv82Z2qh7eaTMptTbKArSDlrmejisrP35+QFCae93KpXft3
KiFJSvbtwCk2jF7YdDxEXhqT/SNajpOy4Upk+62MAH2MeN90Ny46E14WCf+n
/10KR+NCzEPks+GRO2f4n40SKPWvIvtFYiYsJv7aKktVRIfNOcW5BmwQCz29
ND0igKtStHqkYlLh4ExXV4hLF+Qd+8oftjEazJxzYOUcF4of8Ri1JPjm2HRU
iFKBOZrGbq31qib4+mhGEHVGF8PE/5VU1GbBGnZfHF1DGz9L79ZpfpoDNL47
QYnehrjtdmPin5wMqDfrM00N0ECd61OfN29iQ3ejtmm44jL8EqyxTBenAMuJ
dGSX+hd4/zPo955NcaDclz4TVEXCe7clp8NdmVDWF2jp/FcTmazrKjGXc0FU
pd82LEEdb15JS6NcZcNi5Hf53R3EvtmJpcyOLGgRPHv4wjEVbPElNZL//7x6
8ruGWXOgPfXnuzldGixXldtdq+qAnB3J8rvnouDfl8I7I5tISMn+tMvpAhOM
NRq4iK2PZ1vm2+rHcoF8mGUqn6KG00azIVITbLCU/C7mIaCL79aHMAsDs0Gs
ucTv6Pt1WC6xU52DmFehPNv8XfxF0CvSKkWqOx2eb3c7sBjOiZ9OzcUo1dLA
ZtXxer0FYzQjkx7Xa6YC80D1Lma5CnKOjb/0JeLdJrp7zekfSphexVUwdZsN
bOtLQz+CNfDUIULUrmdDDWX+9BjK4+ZMn+DDF3LhrlXR7yqmJQrfq0s1M2GA
eD9ljj+ehN//cPlPHmBC1peBN5Ppxshwcb/3m5IKumFvvnasIPiNcmRQ3V4G
yNzxaJ/6o4cLV5VPKX7MBH7pEi2T1YY43sO/e5UGC34daVlBnjLALSZT3Hnr
WaCw9R9pKN0Qa1XYu/eTM+BIwKEhNz9LLN37X/s+ZMBQ8TL30UVT3C+gsVar
gAmh75T1j/IYo5/pgN1VqzQYtSXH8hJ6KOe2/AAnlQFZtZtDUpZ1MCtvSeHi
uWzQeckp6yulj97HFlaYtWbCm8cVnL7jerieq+pW1kwmXOAS5KLoG2DOY7Fp
qWEWLEm1Fwr/JvSch+NKOqGPjde5Jf47Y4oDha+YYTNMuKVCHpOJNsIrG/7m
i46nwXmbcqMDteaYW/L0YHglA/wXngarjWpj4au7v4fIOaAa/WMkk4PYF8bf
4npLsuDon4/cZkR/XT1iklZO9NeW6N071krro+SrgyfYzzLBQTBd39LHHNv+
sh1PPWXAFSmea7UfDfFqhahuPFH/66r6fpftdDGmcF/sglM2SFu3qZ3rNcaj
IrRUWJ8KqhXVmU4qCkQ/zbkpP80FsxuUBwL6ygQ/sfu4voUN22g3vKpfKqH8
rMkluwI2SJ08+pNXbh3e6ltZyfz/fIopF5gKtEQHLz1lbmDAOnEvxl1vEm6m
ZS2onmJCp03z44zjxniqrSxnsCEVYmqFi0/1WuCL15ef5fkx4L7D1Y3fq/Rw
SirQUVgmCx4dztn14rkB8ntnDEn5sCB+vUpL2HUD7KyWV7K+woKfG99IPz1l
iG++FG5cvJgBVRoNmzYuW6Cl5RnHpwT+U9ljk5HuprjdVKXiBXcKTNxMshP2
NcKZBZXAIsl0WLNyd4BbpDnqndB0m3nAgK+dG9dKbdbGm8Jn74aU58Av1b5D
PgG6KB83dSpVJRvUaoWo7Wa6qDxi899Xl2zoOzevvuKyHuaXik13konn/dOp
zsJQC1z9cGvCtXAGbBAI3qfwzATjVH9/4wtKgcdlRd8evjNEK3sOvtyRdFhK
4FgnP2+GJ2OUhSVHGLDQOJA/sl4LSSnNGy6558KDftH41746GL1LUvbQl2xw
aBusrDDRwVc7aMtUQWK+eQkmfgzVxRUPGJ9HJLLhXvZzoSOnzfHZzzLviCYG
UOx3GxxUNsbyoow/FmvTwLIiZ/7rMX3cHSYa8uxKJpAs3+48+c8UnbhSH3Dm
M8E05uFZ86eqKNjwx8KMNw+sxr1WbxxXR9fFKw2i4Wyw9by+SbFcHS9N3b/7
MIUNO50MfjotauDkxP5zOXxs6B9NCEofEsZtQuEFw8HpoLqDa0LpoTDSSpdT
Yz3TIXz93Z8RRiJ4+9uRV2/L0oHkq3DQ768oitxISzvIwYLevvkev6vcWKub
9cqQ0EsOSV7iR36sRN0kWr+rMQNKv+b7/jJeiSc/OtSkD9DhSVaRwX9mPMjH
EaF5TpMJw2f0twf6iqDlKQWPE28Jf7/kUobFRVBL/ZK3FisdLly1Kn0/IYJ6
QjffhllkgJTY5dznD0Txdc8/btU3GQQf+yKL82vwZonIkMnDNGh4uW1965Ig
6jmaDh36lQrfL+pmbAkQwObnZMFqt1Rok968drqYG399kv7zaoqYHwEu8kV7
iPuLJmwzX6ZDshtpR62ACCrU+Nn+YqTDX4fpa8whEZwVzvJXNMkAd0HTfSN3
RfGPdli80IsMSDTf56zCKYzeW2TPRTenQT7LQnx+pRAO5euGhi2lwvN/F0XG
TgqguVrPpte7UsHS0rzXkcWNB198/HBvlAHbc69JHz0rjLd8aoYpSulg8t5K
oVNeGLnTT12a600DlN/DY84vglUd9Bsd9HTgPEcSy04VweviF8s4ltJBo/vO
hqkoYcxj3VrxVzsdBm9eWrtyUQjrO7Tdp/ekgeH3lt/v1gli7MKqN1bsVPDL
LDl1uWUl2gmZzlYoMMAtOkRpYlgYXe/8Ojh6Kh2yjFq5ZkuEUa5k4trqjenw
cLCGM9pVBP34NCdrmol61IUc8y8VxeS4ovqlJxmwX2a4SeXBauS1qbzffS0F
4q5pffkxyIt3qo7KMfqYUF0akdhazINpxss0991MOOg2dSzAjht7FhcWxRoZ
4EwdOBLQJ4KyPF0ddH1iHyi8uNAdL4KpcilWFt/T4ftwDjPNTxR/tlVcPpSS
AddauVISlcRQsUVXKFSaBSHc5tzPGoXxjojSaUeiX+MCPHQuRqzBJnL46y/0
NFB83mn6YEIQH87vDUr8lgpdFxsEDzB4UPBPVX/gVibs4ByfvS0iit5P284+
35kBoUMpkTr3RLBmovgFSSIDxm1DTR/li6LN02opocYMIJdluWdZiOGNSTG+
g1osGF8IvFl+UgSPb35f5fsxHR585JlbOi6MquV5gnxr02Ft1Pm+VtM1qLjH
PCr3VBp8lJWJX1zgwevxFv2v/v95q5uvfJvDRTBcj+vG8S/pUH6o7fVJNRHs
UgozuluQDqIBzSaHJUUxNaj7nc3uDMgcufmvni6KtoZP7DtvE/w50Padb7AI
TvT/Lbo5kA5uEvzxe48Jo0POWrsV0unQGcFMeCO6Bv+91YjXPpIGZRecC1Q/
cKOQjY15HScTbp5OGgyyR2xaK9156y0FGGbQ03bLAbv8o+6WhVHhyj3V9+7i
Frj3Y7dlaCbRr9lWPz8ddcDdwXz/WTlTwaP06FjNbkDrHqFHv+Op0EpxtJFS
csDah1e+feOmworokqMvb5kj5/XiXq27DNDfdKLFccQeX97OCVJ8T4FAsazX
bjsBo9cnypOTqXAv8+LQiLwDjpsekpBdRQWtyqR5g5vmuHV4jCpWxYAD3/Z+
EB2yx4XMge2hXRTg0DzdODxghwNmWqQdX6iwpzM/9z1ht7bmeCL4jgLvEi6Y
nnY0x2DSKQx7xYCGGyPUgRv2qLe9ZMu6WxTYZORwwW8R0CZ0r1S/PBX+1a30
23DMgWBIvVNH1lPBteGCWN6wOaavrjIqusGAjwe7Q/J0HdC/vGPNaREqzA6n
uT6yByxT5GuVyKbCJl6NwzskHLBjavvSvz8UGFla/7H4rjm+WsxKPnGb4Aut
f5496rVHW2HmLcHXFMh6Fv2TJAUotf/p+fUNVCAYfu9XDgf0PpgXFThNgc7A
3plkgj+/NJUQAoI/i4d8MNj11B5ZX+A+qYkCF0u+/lgcscN/jh9qpceocH+N
GG3DuD0+vn3umF8PBfy2JNVz/WeOy+a/e68+ZoDCe51wi1v26LXnuwVvJQVU
f25eZpSqoZsF30F1Qp/VvlAc2jimiqWzPJ3vVuVBbMz3jOQDanhc1+v2ox9s
uJhQVOzMrYbRByzTtLkIvhoyttzHo4qho2fWDojkwfl1YnMmvqoYsNLg7M7/
f3+oS22Q3KeCcbpfD3wQzQN7pfsfr++TwWLrgWvxvdnwpu+fwUyPBuqrfM5P
k2bDAZ+75RtWaeD7r5orI0PYwJwUaTsTqYECZ5p6+JANjdbeP/nUNXDFhr7C
MD82BAxuun/pjzo2CAlA0lk20Aw+zH7x1MB3fE+eHN3BBoHxiIlvHeq4omuT
iUQcG25ZDv1eDJfHZLvP3VsZhL6VTH5cN6SBYPH76TFxwr/LhXZRIQ0cFBJP
FfqPDbpCg38xSQMzJ5W+atiwId/0oOlbfQ0sVVbe+sWXDVsbqa4rV2qgWfnc
AOdpNoR6rtsc7a2BEVnxetlbCf7trD51vlsd217cFb8RzQYemQZDGkMe6xI7
miwycuGO+9EPui81UXrvSsqdzFzwEH34TnRJA2f03g9aEvu5SWUnKJ/TxDm/
a8H+rbkgq3Tk6Mu1mhit69hltJgLOfppVnsLNZC8wkiYw5Donnvscq1Vmthf
khX/josNftTl97suaOCyX9gKbUc2/PZTdfnvqCL6Dbav+qnGhpwPxWajN9TR
Y6N1b2k6G0LupFzf9f/fAx47eDjzPRsqbykkF+9Ux6w/Ei38dwj9ZcXD/WBR
DXuGud7ffcmGuCtPtzQcUUPlt9UOgXNs6HSx/0+0SQ0ra0LOV/ezYeSKb6KG
tRoqjQtKhv1mAx+l2O+Nvize5RIxnCX4msL3dckkPk2M6Inz7+NkQ69Ktc0x
Qu9an7tRHEzoXRdfgztKlRo4/mtfZLIOG/bZTTU7u2ngn18P3drdif4oDs/Q
9CL0oWPXmpHtbPhyWfKQRJUGMoXkOxq02NDGqWt2majX+L6dswKHiPtTzrSX
98lj2Pq4iasVuTBjd2dD335N/C/R/3rBu1wIXP9AMSNGA28M2D8qsmPDf8bG
kYUEnn/3BauwCDx31V/4coXAW07MI+oroYfFr9Vbuj/WwNsVHhU6KmxwftRs
uEdBE+/nP31/fD4XdmQM369I18BLLr4Za8zZcLjGBwZjFNBheffc9VGifrVf
THqbNHEsesLoT14uRMXFqCZPauDvnzPc5sJsMPhe7OV7VBOlePZH5b/OhSOx
V+4GCWjiaedbBRs42LBh/9dQ7Z8a6N/8uSKDnw2rNh9fH7ZdEysYAtr0/lzg
PBtEetmqgWV/AtI0ldiwUYr/wJWtiljR7773vgIbRD7p8D7QJ+OpJXvRA8+S
IMaHmYRjZNwX2Jro9i8eFriu5l3+TcYtT7e2q+fFw+653517853QWizm15mD
FHgt1H6ScyUZf9VpH5x2S4bmn3t/fQQyHrxPCOTkJFBZdtT2UHHGr7sOOKTO
x8Hk12Ma2r1OWC5a89z0dTIYcB8bd4wlo+fkqRU/IxOhX3hfSVQuGZsO+XwT
1EyEGs/ODzWbnfAuZ4m4kTAVrvfNx9kXO6G8hWBO1zYK1CUUG+kOO+Fb1+Kc
2OpkyDZkLoU/IuNbb9trFFYCrKkOlVTrdkIeu8v7P3UlA3fJk0mjaDJemfJZ
XJmUCJ5hru9OZZPRzlP/wTbDREgX/nmh0sUJK+1/C2WKUcHPP6fCtNAJixat
+jp2UmD9vzMLcp+c0PjyEF/I/WQINz5cH9hIxpyg5746+QnwpypV7x3bCa9d
Tug640cBKS/hy12byGjhGW9z0ycJ5B4JPtX3JeOM9bL3McEkcHyRprRe1AmP
fHJ3WX+YCgKq9H77407YyCPp0ttJAVeyxvIC4f/0z8aEn24UsDPc6/eSiN+z
h1fuenwiDHPyJ1zlIaN2VkcDfUMyrO2ieO+9R0aFyYJW7poEWKV0fFy0g4xO
Tv7fazwToLXPsq0h1Akz5Cq7y+qIfMSUhlcT9Qh/9LI3iaiHeCLbYKUEGWtu
v9vZI58Mo9odv1V+kZHUYl5xrj4e3Hv6smkEntPco7N33iZDfNGuYJkoMra+
cVFdT0sEtqDrzfAsMqZctsyTNU0E5c4mjUUCzydx1QPKBJ4Pc8i1D2444Vh8
SPK3XRTo1tLZu2/QCWNn3mmxHiSDxoOi82MNZFz1T8cjuCgB+l8Yec8+d8J9
Se0nLs0ngzbbXZr3DBm7eOdlT7YkAteuWjtGMhnhCM9R58BEWGdlMWhh54Qm
M6TUjxpU8O1eGljPIvCcDvZ8cYYC8qFah/M6nbD03fbvlqPJUDsjQT9RTkbb
HT9WNgwnwJM9NK3nFU5IN7wVYmFHAZLXj8geLzKuS52qNNZNAp0dlut8g4n4
zrgWur5NhHH+vd1rVJww7VuSWeFWKqx3oE9KX3LCrmPF4XduU+BD/5ulkzVO
uFBSqnBCjwIBa8p4nVLISMl7d2FgWyKcP/P18aI4H8q4VnkFzjLhY+1JWtsm
Dpy8zDP2xYQGeQUZlhnuxmiVxix06UsFp9iLKU11pni+Jjne6BnBpydy4s4a
CWKmK/dTzYJU+HT9dXrNdW4cuLpWl/WFAa+LFZoW7ktg1QnZYdW3mSBoKCzm
bWiOFvTkuri3DKh0UFgSOC2Kzns3i67LJfTMRXlvL1kBDL9FaekwSQUBva6o
6k+GGDrDUbKC0Gf6V2lL28EEHxjPQshwCqys2NEqe1EcH+1ycLjDnQm0eTqJ
V1cEPTg8FitupsO5hWiGzugavBT5J1C+Lg3Ga/QjkqpI2KG5PT/ElQmaWg/5
g66IotckPa6tMANmb6R2fjIVwATXa87Odqlwt3FRfbDfEB8P3vryuicd+Dec
ltW1McH05Nu6/mMp0PH0QAQpURyvSvSf4hHOBF76fssUKxEUVqdxllelw/WA
fRqiLWuQdt5pz+dSQg89+je1+TYJy+pXPH9M8H9taz8uRrcYFv1d0cCfwYL0
7e0nPFuEsHv134et69PA9ldo5+ULhqh+UI9ic5Lg/692fRv5ZoyK71NXqhul
QsJl3q5rPyQwKsH3ctKvTJiffrGpp1IUFS/aVA22ZsBfG+NAnXsCuFzNHq0M
SYUoCyPt7z4k3K/yuvLWf0xQNhlpmqAKoYTnEW8Z4zQ4aRBpcqF5Fa6a10lX
TmQAd68M1+piI9T+bK03U5UGHOW5dadXm2Jz0cBGX6sU0O0WuL9+hwjSEmQr
k56mw8Dy/tH+1QJoGz2yvEYvFeRrtA/kCYrhWQMlSVV+FlB5npybDTfD2s7g
j3e4mdAnk7CLT08M9S3LTjsosyB1c6XXGEMQn0pKa9NepEKZ9o6QplpDzNvx
I/icaAbcm/C5Fypsgk6xaz+cFU4FPWUpZrOBBG6/Elq4JiwT/nvy3VfigwgW
Gn9mpullwJK6gX98oRDatsp9irJOg9586lXHWBLqrq+fLzvIhFl/Q6D8E0P6
rWu7qbdZoLmwKXyItAaX13KmCYakQfezNFJNlCF+CWobcffNgH3r1k9y9xlj
5blaoTxyKsyVWfpVrpDE/Yc5duv8y4SL6gVNr26JosnFl+TfLRmwonLv3gV+
QbT+3FIwl0ro31PfFgp3kLA3rfCu4nkmvCbdNY7yF0eOdp/1vIssOBOe8Uj5
1xrk/Pbw1uPGNJgmLfCEHzTEaX5DzeFMov5zOzu1nxij2WG5f3f2pQLpIIcg
/1lJDLo93xZLzoLeryeApCWGsQ7MTroCCwpj0gsODPNjZtRdrz65VPjFNSmh
ZEXCywumP0qimFCgNV9Y5e+EXDnWyVf7KbDrR9mpCG1nbNYq1bHtjoPo7kPr
m1c6oZ5L4HHh01Swjfh+bhexbz5Qj5IiiX1zWs38b+kKJxQxYnAePEuF+OW8
MnNifq74ywTHkgQw5qn3GH/miOPkwVaxm1QI+fRvcuQKGTcfunvtR0oiLF9b
OHfRygm3CCwFV+hRIcVB8wnHIhl9jwW+0C+PhwBVrouDHE6Y9a+wzeM8FSJK
rla6EPtliZ52eSuxXxxzD6ZqzTri5Muxh2fiqMCh4rWUeJOMvcK+waz5BAjd
J6LC+d4Rv/9NObAqjwoW3k/SQ6nEfja5c/+JbyIMTX5+nd9tg6/Eux02jtJA
uMVWdO6JLT7Mu5o1c4oGrz94bZln2GHVULcqtyQN9ryV27OnxQ5Jh3IqHv+j
QpJ2wM0iCcCShZ1NkQ+oIOfi/HKXCODElOOhX4+oEPjHmC2vbY/xt7+K6F+g
QEvigdNTxoS/12IxNcZ0oLMT3P6I2qLh4Oa6E600aH5m9/PsgC1+EtjKN+ZH
gyR1FxkfUTss86sflN1Gg8fvpL+oedrhzr6by7qGNIi87xIwudMOE2QFLukb
0aCfMzfkcT1iVGOgfV0MBUavH475om+DTmLjZxNN6RD38WXlhJAt0ut5JH2f
0+CrpuAB3w+2CM8y6zsCaBA/dK5/s5AdPt+s0sexgwZPLvOtXOVuh/UpB+xW
G9OgtNfgz4vtdhhpKijPT+yHUgX1A/l1iMEPt8uHxVJgevJ084pGa/TTCiAH
H6GDzxCHaHSODa6+/WLYgZMO2/Z7Z38JsEWvjKHTbWwaXMo1U2vJtsWsO3aH
L8XSQG1hTWPiJ1vsMfMZnzxCgyA+t+oYAo/Xb9ZLDxB49Of5v1G/jPjtg+XD
69cp4HJtUMA70QZbNSO2PeOjg8ztSHZRsC02/FNfn5VFg4aTLl/Ogx06Hk7g
3G9Ng+5/tD9FwcQ57RS4qBL1vcN8mtFgh5UM26FMLhroZ40W2tyzw7XjMM63
igbJMo+b//xCpDdcmdUOpUBBS/qzYkMbvNMmntRoQoeFO45JdQSeVxn3FUIJ
POs3pnZIEng+C2G3/vw/nm2ZxVOCdsjnnRGrR+AZavstwnaHHR5a+k7qJvC8
prPN0n2bHUrMfr5aReC5sGlk0L0aUbYnrvB2HAUyxx2a/KVtcCCdg/+xHR1C
Wz95pfywwf4u6dsL72mwZZ352bcPbZE7mYN33xkapPVf/JE2Z4vV1yufhOwn
9ne0pzvdzA4bqDk9J4DoX4+myFlTOyw/39eohzQwN8076XwDke+fk8puKgXu
/uDk1huyxvI6VthKDzoYf2h9a/3ABp/+s3Po+E4DnmTn0dAEWwwu+a5nQaPB
9uK1LTYNhD/F6GbhczTYkNL0xJjDDjdfEHxE86RBz2vTPuZfW9wctdFlx24a
+AdnSkEionrkqkKXHAqcfhZ0UqPQGSeXt3FX342B6Om1UyUEH89Mbd3qfSUR
RuVGbpzsJGPqq9Avf3YkwMfuFauNnxD8/NjME/uEBDA3+d68/5EzVvVpx6x1
jIEMc8FMo+3OWNDw7qG5fhx06B9Yd8WKjN+Ttpr2s5Ng8D/NGOOzZLwQ8Pz+
70eJcHJ71t2q42T8cy30rvVQImylFggxDzljRJvezOvuWBAu0krX3uqMFvKr
F9XM48BaEIxjLcg4msQn9+BGEqhl60qonSbju2u51zpaCf4uSzMqO0ZG5f/i
tg5PEHzw7GhWpI8zTom2mI1+igXDKXHbCklnnNNQHH2sHw+HNyxLiHKSUa35
s4jQPkKPiB46rmJDxid3ZngMMpNg/TbVGk1TIj75Y+ZdVUlgolz+xVPLGc+t
2Oi/tT8O1HcnGp667IxlamYD4T6xEBoymvmX4PdbuXiu+61OgrfZNc+di8j4
48RDkzaORJjkMUqzzCGj9PmeMCu9RDj1SLAjMs0ZXx5ZcW3XnxgYu9jTt5fI
N6fHMGGDWRzMbqfELFsS8d3X9a28mgSWitNOrBAyOm4+YDz2PBFiFU8+6CDy
5Zyc991H5Pss1Te27qAzPuedue89SsTDpyob7eCME+5bqjuOx8HXEdWWA4Te
0ymSzsxpTQLnJlcjAT8ybhLOP7rqXyJ8FO5LnfIm8FQ62xIuQ+B7cT5zxo3Y
R7tHsxXWxUHuNpPvXhrOSG7X1uEZi4OUyIvvXMUIvLkTWPtVkmGW+6VwP6F3
gnuSZKmE3rEIthp65EToycsa6p/CkqC7K3LDIwtn9Pm8w+8BKw4evD9gU3LS
EeOVzB3orVRoSxTZvUHZGvWqLyl4FtHhZM3xvUMtNrhXoaeqZpoGl0tSyrXt
HJFM+/jy1RMqZHN/CrR7aYXbLD89u/6MDj0/Ll3rkbLBbveS+1xAh7a3c0e8
bBzRs0DYJZB4vR4tgv9xmxUOXlrR/LOVDtr+XsLPxWxwY6pIWzfSoem/nUo1
vI746xCHzPU7xOujN3dL+Fmhz5t2E7evdBjOM3frzrfGh4X9VuxgOpxQ79e3
2O2ILzOiNTOJ+Pd884XJRSvcGbqTY6CGDooTitJup23wy+T8DglxOpBuf+IL
sHfElWpWT8+1UOEmx51W+nsrDFyhuWftE2I/vEq7RBK3wW0Xdj8qIuLRExTI
SbZ0xKf2UreeNlNBudnt9zQRv4XVx6RRIv7KB477i5es8YTj6KLyZjpknVBP
MVB0xBKFH/WD96mg3ad4UCHdCitC9WIV+umg06a7xaPZGt1/fylUPESHLXFP
D1S9JKGiesXqSCcmlP7Y7KgVaIKnz8mr+dengNvT9SV3Akwxk6uI/muBCdZn
OoqO8pqhz55gg1l9JghH2sD2HgNsuu1EFfZgwXNp5kvL2wY4nnks5/cZFjjE
QYTEgAFG++Zb7dvBAqennj0oYoaNj3SOtuowwb4yTn7fajPU+6moD8R9PgLH
VUcI/xFTG588upcCeUdvde2zM8UzF+SP3JZIgR1+n/wNmCTMChgKyN7LhGrJ
wzKnBAzR4PBgrLcKC2ZyT9GVFwzwP5eLBYu2LKi6VIgygoZ4p3GN2Y51LPik
nTbe6kzCn+F3PxVdYkJD2JtfakQ+43OrR1YbMIFDaH+6coAJVskoJpg3pEBa
aMC8hbUppkSMCvRIpcB/t+cTLlBJqEJqX9TdzwT9m37xK1Yb4k6eaJK7Bguy
3mbHbZszQKPQKyEj9ix4ouFqfY2wkzmPZW1VZ4F+R75ZrgMJzV8vl+eFM2G5
M2qvXTMJuY78UM/awATzPV3qvlIm6HZIyKCcLxU2/ir72TFgghlq0R+DvYh6
9J9PyVInYQSqpGpQmGB3jW9IPcIA3aXv9RmwWdDiLx8o7GNA6En4Ul3Lgism
Z1K2EHbvSgV5YcLuXey63fGVKYY8+pHGcZ8JPW3tMR2fSZiv2WOVZMUERqqE
ZCyRf9kh7bm++ylgkZ8p0+dmihoNM9PWPCngbbf84dlrEtJVJobvOjLBKU1m
2eO7AT57mTF9yZEFYh3pcRrtBrg26vuV3wdY8LRd6PDqnwYYm3yZ/yKywD1J
7UUqob84NZv33iD0142g4hF3NTPU732X26DKBPbN8tXu4SZYKlau01qUAlu9
j59z22KK96+oiabxp8DyKkkecgYJ5bhydM97MWHmZMv6cVVD3Hd/r8G75QyY
4RpSGxY3xGfHUhWrJFig/LckZrOaIfYbRc8aE3ZxzcNNR4CE3iotWzWuMCFj
I7/cN10zfCtUT1FYx4TBCyqKawn/B5JTLi8T/gsOUsY/OJui5QHnzK9rUkDW
8IHCVkK/pAnd5btJ6JfjO78PJGkZYke6lM7uHxkQ9SCkZFnGEM0Lru4/K8iC
9qfPla8R9smzZjtIhN3QWWsibB0Jp7XFnYxoTAjKsrvsyGWGmw60Kr40ZMJD
8t7uuu0mGCvbwTrcmQKcBmJKxyVM8S9zaM0x4xSY4AzR2kTol2fkG9ddCP2i
ZWObvO63Ae6O0/CptWLBtxc8G+j9BviAqsxmubEgnyNCeHrZAMu46z4ME/Yt
l/p+q06ZouJJEyXTUiaEtvO/sByWR8Xi426Nt3Nh9pq/gfFmObw5Zj2mrpIL
L3yGFBxqSViyIcd6/xYm3CvaPG4JWjj0cl9Twe5c8P3epGzQq41Bj7vm8rfk
wPYtK8wEl3RxtVXbVZnKLLi7f37z35Pr8Odo67s23jw41NbMVilWwurzpk/f
pbHh09pvBze6KGAav8xB+ze58FDptid/kCm+6GoS7fjFhIOyKtSWMXXcnzZi
4xTOhlfKcaPXNLVwJiJHe+FILlg069c8SdTGL4uNsTZROWCaNhEgr6iEqk9o
bPk9bJi3UHf5UqSEIYsKRg8Jf56cHS4BZAUU1SrPf9hBvL+X82iDvykWiMro
pS4y4YH6ZATnR3W0uu/awIxkg66pfISVkhZGHl7oGg7MhW06F9fyRGrjNS/H
U9YJOTD+4f0zT0klFHd5KPdzFxvGy3a58aUooeu39Xx+FDaEGO8vkrohjwmC
Zw3qc3MhikeS6jJvgm1/aZapG1Lg1FzXyuFZNZQo+7Q+7zUb2n1lNawsNHFF
XEH86S+50O5hkTzE0kJjjY1nWOtyIWIqI/yPuwKK7Hz7I+FdLqR83aAi6a+I
3ldOeLursUEsqN6/TE4eS2cSfzWcyIXgZwJl4wok1GzWoCzQiX65pdEwrq6J
KttkVuvO5cJ2PZL7ZwFtvFs/enZjTw5Ib+r+E92tgw6Cddv0mNnwiKuda2C3
Mr7RnZtvfcMGORjgo3Aoo1pwwh7VGjYkZitkqfQpIHNVinvu31y47qx/m+Zq
irxydZxNq1Pgq3v8VpdaddTZtHz3DJ0NT+N398RIaeGZap7pHydzQcpBf36n
pzaeKH340bIwB9bd37/DbVwR7TXPm4s7///+z+qvURl5dHpCjF6wgctD8Va7
gSJG6Xu+kZFkw/NXR/xKFE1xPMNQSEonBXZtf6Nae0gdKSSvOL0yNjzZZW0k
26eJLmtfuX1m5IKjYwxdhFMbbd9dsef8lAP/8TbqhJMVUSdAhs4txwYzhZ7E
dFlllMh1Lnd+yAYR3QBL4WoFPDmykJtB4OVZoSqw67sJNgRYFAlvSYE3Wn+4
bP6p4cv+riCNdjZUJ1nvvHRCE98Eq8n/bM+F0yyhQdVcLdQJ4hydUySeJ1O3
4OCzCujbF6DB9SkXltKX1hhft8PkLSdDo4Vo8L2ldy5r0AIX9syLLB9mwOeV
p/l1iP1U10kS5iP208fqS+l/RKxR0PTeQmAZHT6JcESQDxngry+qSWPVLLh5
l3pMv94Q2UZFNo1CGWCQY7KyLsoQhfNJa3b4ZsB9ia0WrZpGmJiepHzgaDqc
1u/d/inMDm+orTtnpETopUsTg1t9LfDvXj/V9BgG3MzNLeck5u21at5DqcS8
bdvVdvjqDivcsTWY9/xPOpiv6jEMbdDDpEdZIZ9Fs+DBtgutOx8boO1Hi48c
ASwI22RBXbfFALflC1hOtbLgjNLjrlfrDfF4POdS22NiHr+dP1Z9zg43Shua
sZRpMLx9KjvJ2wIV56yqE2MZMPLBt29XCgm32R3oVST2vfySlv9lVytc0bUh
aPwXoW/H0iYlq/RwtNGR1SSTBcUdopPD9wyQV1TZYPwEC6QSl6cKnQxwo7O/
7NhrFsAD/b1UR0M05XtNTW/LgI2bJPY/k7PDj39vpmzaRAPBRuVLJj/NcVH0
vqxjPgMoe2aUUJeE29UCanwSmVBlNcb+8cESNym/nx+QYwC1/d5zWrsuCq5f
bkx9mwWNq7Z+curUx4WLb9UNDDJh+9bfgYf26OO6g+Y3bemZkPYvLy4gxwCV
jr/YsyqOBWo3rVNf0eyQd6r/0bwkoc8CjMipBRbYJ/yBk3aaAX9uk273dJLQ
1n7R47MDsZ9n9Fw6a60wxar2XOVrOvyYeqT6JVsfI6c/JpP2ZEKWWKnctLsh
+ttFWgyUZcDAyW1r3OUM8eqhA7q3+FgwGyaXYNFoiD3/7diTyJsBFmHt/lcS
7FCmW3miXoYGJmOmJoJ+Fihg9fH1tWgGyJ2MOd+SQ0LfeOd/up5MiFBl7crd
bIVffWqKkufp0Co7c8Dhlh4GnXkvqaGUBdVRD7n6Kgyw1/hj5dpzLPjyRFjW
wtIAj/T5TW/tZYHw2saXW20N0fIKbQXrbQaccDrygBlJ5M831NUqRwOVgqkf
t92J+pcWxmxKYIDAgN9wdDIJrxwxP7fCmwkOvOnSo4ZWOD0RH8PDSdh51d+d
DtbDA8HCFiu3EfV38W1bPGWATo1ybhw3WSDawjgquqyPUpiwMUYwE6Qvjm1+
IG+IlZHDQod4WPB5zOf38HY7PPU7oorj//8v0lk456Vogd8cetJq0hlgF9EZ
VuZJQkPP2V27zzBBSnb8QsySJZ7oq9glJMYAK1X9U69X6eHvtpXiZYVZ8K1Q
6PA5HgM0T5gX28KVCR2cexTKKfroUn6Re+5IJoz37H9MekX0YwJTdKs3C/4H
bQkA9g==
      "]]}, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> 
    True, AxesLabel -> {
      FormBox["\"d\"", TraditionalForm], 
      FormBox["\"p(d)\"", TraditionalForm]}, PlotRange -> Automatic, 
    PlotRangeClipping -> True],"\"h1=4*\\!\\(\\*SqrtBox[\\(Nd\\)]\\)\""},
  "Labeled",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"]}, {
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, 
    GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
    BaselinePosition -> {1, 1}]& ),
  InterpretationFunction->(RowBox[{"Labeled", "[", 
     RowBox[{#, ",", #2}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.50441578453125*^9, {3.504415837359375*^9, 3.5044158591875*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{3.504415721546875*^9}],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{
     Hue[0.67, 0.6, 0.6], 
     PointSize[0.006], 
     PointBox[CompressedData["
1:eJwVlnc4Fn4Xxh+bkD2ydwiREfnpfO2UZCszmmYDGZGRjEhmISN7ZD0Ujz2e
RSorI5TZQAghEq/3r3Od6/x1n+u+7vsj6nLL/BolBoNRpsBg/j/Xdgf/FK1v
gJv2aWzmDB4k1ankOEp50KudQ8iZoxiMgtXfVlSKoCi77e5uNiwo9cXuWg9/
BAVhFxO8PBGoH2kuKCmsQeEnn3n1CCLwUj+7I+C8AbQeDSoCYgQoNTzvwKHD
hmyzJbTEubAgry0c+MaHHXnVCFgnqVYBBSV3EnGaH13WExhRPJkHoMDNGGC0
ChnDhnJ5s0TQshrZ1uLsgwrrhc9bTARQZOSKNr3YB2qmvtphQgRIV+QqZzCh
Ry/lDNTv+OKgN47upmkbHQrrzKuIGcPB35MvC+6/4kY7woHnNPdLQA0lpPae
5kBNTMzYWqUKuGb+8gFcYkfdFXYtTA+qwEdUTtqvbhv+E2+urjjTCYwxfaKj
vCJo49SfjiVxLNyz3OyLHxBAPjQucTHPCgBvY24wwi2Ali6YJioU5kGm+Vcd
vstsCHeXQa1nvRqM+J/taoYsQmuHniWLKBk08t2U7hivQtIPeazbDBEG/XJe
uxmzovFfsaMnGGtAde61bkNp74H+bq+QXTwkEVjTRroZUOjvUvc9lXpgXJSx
J6/RIZj9UWpdjwPm88zdLyh/A7OVbnNIIwH4yUmcZIq/QB1nrD7W2gFiEfom
8/KiKFpmnNstvQI8CdL6fg0EcMhcnvh8qxNapMWEG0sxSJtN/53Qs1YofPK4
604NFfLHCBAtjJrAobOOcleeAyVK6ozMX6oAScWGceKDafh4+5d71UkyyKrd
PcMUL4gI8gs+r8SLoZQsMKzFuA493nPCFZLEgzv1JYPtRXCO/PUhkZUMlrGb
wX1ZG9C/ZP+FTEcAZpmLfHImzGidSjuIfqcWDAKlZsmZ/MgEVxg40JoLVPma
Zqr3t+HY4ZtR4c6dIBqaSkdpOgaMBWldGSok+MVhGLv3fR7ensMfjjclQ2p/
YdH6EQaECZsy3+2vB8KC992yPyJo5rYVndRMFZQMWIR85uBDnvFSXpGXc4GN
q1ZdJJ4X8Zonr7NWFoDLfOsVt83DSEc1pEpjqgbY8GMUygv7oNmsovwgvQ1C
6pyVm95TostH1L65Hm4Gi5Th9pY37CiRb8pJ53ElqP7Mypd9OQ2ROrzFCf+R
QSvuGd7DnhZxqkhrMVY2QPasCuVGNSWyOe3TaCzbDODTJbpZsQUV2c/vpkng
IaJsTWtyZguYKrM3mQ/jQWlQmWog7B/8HRDke9nYDnuG4R5my19BfU7Dvy+K
DF66+hxpKTtw7vnDrxw/O4ChTWohe+IftD27dzHtWTtIRMk8vh+6D8KfOX49
+tEGlno8m+2lieBp+mPYoaMV6ivDPo/VfIGx4RWvW70keOtX3dRwax5eVCaI
itmTISbmK51ZbxfQCh/hpGDEA8vz3xa2f0ZhiPkrxvAvEZLmlQJomKZg16Hw
mv0mCXj+rIy+yfgMTeN7bncqSHBFehaZjc2D4uO/HstmZAguvH+VeZYMDXx1
Xwp/dILj3Wx/a8NRSD0+kbA8ToQo96h9NsFJ+LNDfSNynATFs9lyo9Nr4CSg
FBx6kggKt+ZOzT+YgH+k1PeTUSQgnKEpmoQxMEo2vE99ggQbTgkbDPz98FEo
wa/rAgH83G4bcmmvgNsZa8WmaBLYVEdErn9bg3PinTImqkTIZzHCeqX+hpRa
KZH8QAIE3A/55uv0Fowem7lr6uHBjFvHbtBqBIQjZBsVqohwhJPhXeTxHqAc
cvcOdcbDqyiXLwSPDnDWXCXyL3XAk7cP6K487ALHv8BNicED/uVDWQOW7xC3
N5f1JpwMXzysh+auMaBoXYu+7qf1QPKbufL5KD0a5pR1iE/EwZ3kaKmlNhp0
kv4/hjWKRgi/IhXTZ/8H4iRVB3THOsFE2vKn7NJHIHr94y0+cfCvctrjL6S+
QtupEhrCIzK8PcREc/4HA/oheWwkm7ceFq7cDqVNp0el00x03zRxYFjE//q6
OC1KjB6uILxrAL1JI+a1Q1tQ9Vz9vIkbHi5U+q8ECC/A2yRbx/6zZAhLXR4S
XaZH1OTbZ39t1gO3yfG1+z10yM5AscR6AAeaA/1CfoE06EetqJXn0Uaw0DvG
r12xAz/OiYWOTneAe8amYJwUC1p2uzl9k1gDrvI7++GTzCg8KaXU5mkt6C6S
9d94MCLzKLjKl/cGiOuud2R09uCK/2mZIq92CJk65mci1g+X/ho0ppkR4ELC
5pey3hlwuphjHe9MBuz8bASNKR0aCDzGLyHWADqyS+/tPgwBXt9ff9CZCHVN
dy5UOdGgT89IN7nUGqGFV603r5gSnT81cipIuRk4M60qe7c5kfZ2rO6nwDKY
xJhKp306gRw6jUrOekeAdej99H8SPCi2bg5HVCkBbf9T2tZCqsht55vPIkcU
jASuGGoFYJD4SIHC5qdW2HNkNK4NV0bBaemqWFNfOEqHCSw/MQW6XWc/ie+R
oF38sX5XRz/YYYJqF/0JUFhSeLstbwKY78T/fRtHgjLl9InGmwd55UbwP3cf
C3MS5qeD1USQ9bszxEB7LCSd5PkmfU4EPRjoZIrzPthDlj0CTrIjTs3qtobh
KjjmNk6h4d4HOX2pmEviBGCPMnoU0lMNDrn4Rb277aD2biBQNvegz13EG7DK
WLj+0O14p68IyuvPlJj3wcKL1oDse2EiqNJ4037HFQvZ9X8frMWwIooW3imn
PixMOYe2rRz4m/f2xTDuA38/qbEyzTngg/crzvdWD/hgKOrlkcoQEbS5lHdm
0x0LkelyZvtPRRAuQ9Qt1goL4Q68vAqRbGjc4ieTbFc1bLvcfvSzSAQlnPHs
pZbCQub+8e/ZgSII3W3v2rqNBY0zWaXBUSKIr+AFzsMFC63fF99Y9rAisaMU
C/kJWKBIb9qrfv8BNPP0X6dO4iE7nUg7710PKv0h549TdIBbGfXn28rCiDc8
7UdMeiUomEU/XKsbAMFdh+dptQQIbH65++2SMOq4tt3Od6YKdpeT046OCSHu
uVfa02vlYP+hI+kyGz2apabna8vFAbe7/ewqJR1Ki2RrCzdtgKKCF4uG/Gvg
mFRoqxFHhMcJSXq++ttQQPpoxunfCRLvbU3lbTGo63M3gyRtG6zJmnorqbMg
Z9s80+6mGsgSW/2gFfERbt5IeU4lQAQrE37cuVBG5FJ4vcL06RtwoMgxvRyO
QXd3hETZ37fCXIhNaWrrJrzuZ5rnicWD+X+hI+bZPyE17kzL2z8kGJk2k608
zYi69IczQz+8AT8ejeHPHzBITrqaJHalFehhR+f0kT8wYYdxXdnshPYig8KH
0qvAEfwSx7NKBHm1G733nLagZi75pKABHvglWB34KSmQUZT/up5QK+gxfPyD
lNnQh+hcWh1JLJipU/gHJn2FgOWFEN+DPloasZet5qBDx14UCuQbNMCG6vK9
mQYK1LZ/dKxdrQXSbL4NX15fhUudZEmmLCKYqVQRMtxVUZVQastUXCTIe3CJ
RY6dRLFUrroBTqGgu1qRL2wwC9O9hWpBHmSwjnx93PfVDNyvKqf56ECGV5O4
WA4uUXRV85Srd30lPHWjyJczP4U8w73mzHwCIfHqKYkbxiqos1OjSODuPdBP
7g261KmGJpjFZK/F+AMzw5DN+v4OXK+7G/OirQOs2byncph+Qdp5fXLHZRI4
JS0/KKgSRBG4o6GzJcVAon1yz1ldA8XMcnmrl9wB913Hcn81LtQilFdXZFwG
zh1ilJe3VJExS/FiLwTBkauSF+OlVdEvU1qhB+ejYHyQa22kRwZVtemIbzYm
Q17QReFsaT40cUvntPLZXLhunsE3b6WOwsODh7yT/YABV/Hud9BJxOwn9TIm
PQyYti50BKwroCxKi41u2vsw76J0xM6TGpXJ7zq5Exuhr5HkibtwwJtxNktq
R8lAq1uw9FtKDKVK5j2vS86DQUqb0fHeU0iJLKoPI94gov/ehD1SBPEcLZE1
v4qFXra+2YwtDWR1qT3wOl0AqDVeuao7q4RCY3FZE+MRINz+alR/mAVRTuW+
eONaA54jZXIO6lswYrbEP2qNBy0qLpdfxRhUR81NTEtrhXGC1fPbxynRva3H
6RnVzVBK28tRZEqPpuQkQ4O9caBFfLT/+yQdys2yfzGl2ABnhCccj7EJoSYv
nP6ufimETKSvBRfOQ5Oc7iCfDRmqh+TnTVl/gaLdOsbBiQRGgWGhgg3b0FZw
uT3RsBN6J4Ua9T9tgWOppKAEOx7GLBIfaRnwIoFMLsYW30JgslUvE5B/C1nG
zQZHtPBAnma1D637BSvC/I9XhEhwXfrf1NnJRfB/cl5YhpMMrp6WJhb03Cid
yXns7utS0CKNkVprl+CtnW6cw3sSmNJaTNvUfQdtnmVi5X0y/JwZjcTf5ELf
eUKUSmTKwGdosHmWpRue9bVamXPiD/JQ9uGDNTb0hT6L+pReNTgdOe5zKpEd
hfUFNqKFStDbe1HLbMiAdC0mcnbL6qFl/sbDAn8KlBbE+5Q2sgWkquIMWx13
geqldWz38Q6IZ5W3jyj4B5vPy+UGy9thZYEcXzLJhGYcrwRHm78GnwmX05m8
VOhPqehFqe4miBdJ5L0xzI72FG7EWKpWgr3974AU3DrkNOXfKBkjgORXuxGe
sD0Qd3Tp5rFuB6+vPdnuD6mRIIEeY1TfCEp8Ld8vFh1FlDMy3R8oEkEnP24d
0y2NhhPqeqyokuFkxN2OKE1BJPhRt11rtRDEo75wlpqxoo/eIdxKtDVQf1Tj
/KEhHgRqFhvuhUUQlrLl1hQogbyp8IrvvDLhu71SjoXrAY9/Z5K35SyE0NqW
p5/ieFG2r+J0BrYA5mWdam8G86IB8S8ewRMFkHhN/0pNjwLiL+bAaxkGAlsB
I0XxHBWyIurEJog3gW2WmJJnAT+KijZTHn6bC3ahhzo4h5iRmY+rSO6zWih0
2o4+3XsY/TvxNez1Zg10/cvMOOXPjBTTJ5aoxmrBVXzOzsDmKBo9G71B/S8B
hIMM+8z62dAZDdAjeVaDXalZSHs4NwoRa7hprFoKk2eFVpV5eJDKRQXHJZMS
+LwcpOCswY3CHKQCZaJKgb7RvsxwVgxhjW+wV5hmQ/9A0hvGATGkYt21PJ+Z
DT0O7E+thMVRZVL4K5WMLLBdYbnHWiiGXFVCzQoLcmCs5qdFdxYX+iaxzXeb
pgxEGFkXyTZ4oC5651ep0QnlkdHNpuY4MB77LyKZowN23jW/FzGSRf17E3I7
zxNBLxW1GvR/gJ2yJjGWKTw4Kpf7tSTIoja2+Nzg7Kcwp3PcMoNXFpXv8wfP
vUiCxg3d0q8WFOgcG5uL0OsWGK1K8saYn0SLcao3kmjDwFmQozzrvBzap1Gz
vOgRCJ+5Oq8rhsiglez5QRmZFIiZ7tmLYFZE17UtR5KKfMBMkMtAplcKcU43
lt/xTYSRXy0F8gf5aAhRLoRzUZDnLm0VTCuNJmy3+ofMEkHAxaZXSVUSsUaH
HBW1TIdbnT9TRj4cQyvDQ+OrlGEgXWw7FIoTQ8LJ056aUjkQ4PRC7Fq1GDL3
qXwXcTEH2u07X9n/lUQjHcEyQp4pwC7f9WAyRRB5DHzMtTldDIEcUd/+6cgg
zcMKOmyMKXC6637uQ1cWFC8XJeyVWwMXbuvVBinuA6+hzusE9nZgkX+E8ddg
RG2fHhrFDb6B1QeP1cO0OdA9P/8Cq2MVwHMzwCDIkQvxbaQWVCqWgelMaYOz
NBeaHRKlmbIug0yXjZQv1qKoKF2nPOzlK4h9rTFSKS+BJopNtNjnMkGGtaTV
X0UG3dvO2WLaSgaDa8nGKkEnEAveXvdd/GPoGXu+0cd/AvU5jh7ejo2BlBp6
l4BbJxD2UE+A3NZj4HJLqXBWO4GiKWLElHoeA89HU+b/EuiQiSF/4JPtA/6/
NNDW6MCF8tUnLJWVyoBG++PfeClJ1P2KV0TlVTo8yg3ZVl8TRxiTTHVf2izY
sSOY6GdIIEtOZq+ngplAXvPX5VwQR78/5Ef/ps+C1cazT2/dE0QvfR7RrHcV
AXbf4su3QRHEcSRkaiOlGvB5Qg1bh0VQ7DJp1oMRCzdaBqexb0SQ5hJBH/ev
GjR1tYyOmImgu0SrEzF+WJjB2w6d25FC5f/pjtRoJML3pE8pC2yS6P1Nh3wb
kQzQa5Y3ScqURLyY3qbx+mdwdioWt+MrgQa92a+qBGTCk4w7vCuCq1AgVsR5
bYMIN1jKD9HtLcOjM5PyXSkk6HPIIY0+3wbaztmcUKtOELfxgHc8Q1C/RqfS
pEkEnan8y5qeM5CI89DbsyZDgWuVQ/P8HBjw3WFUjCDD/wBprO1W
      "]]}, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> 
    True, AxesLabel -> {
      FormBox["\"d\"", TraditionalForm], 
      FormBox["\"p(d)\"", TraditionalForm]}, PlotRange -> Automatic, 
    PlotRangeClipping -> True],"\"h1=0.5*\\!\\(\\*SqrtBox[\\(Ns\\)]\\)\""},
  "Labeled",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"]}, {
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, 
    GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
    BaselinePosition -> {1, 1}]& ),
  InterpretationFunction->(RowBox[{"Labeled", "[", 
     RowBox[{#, ",", #2}], "]"}]& )]], "Output",
 CellChangeTimes->{{3.504415633*^9, 3.50441564275*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{3.50441562621875*^9}],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{
     Hue[0.67, 0.6, 0.6], 
     PointSize[0.006], 
     PointBox[CompressedData["
1:eJwVl3c0Ff4bx63MZO/RNUMoWkY8n8yUzFAywldDZJTsUCIllVU20XUvZW8u
914Kyc7ILDOjbCLjd39/fc5zPuc853w+5/1+P69HzNHdzJmGiorqBDUV1f/P
lZ2ev9jVdZDtEgpX5iCDlAqtPBeeD+3H8hkWluSAQZDKl4/5GLScLSJaa4kH
pc7nO5Z930BOj0ZQ4Fsd0D1Rn1NSXIGY+SSfTSADP12Cp7DDOmQtqFs7i5IB
r3/JlkuLA/WKVUrrehWBwrnD/mX3OZF+9lp7ikghUNPwxnz6KYRWwxlm7bew
AIq8LH4Gy6CjOhT7W50MGhb9WxrcnaBs9qv13icCHGfheWpyhVIbiFBz9hIg
8TjPByYjRqR8q+GiWl4ldEQx3DKpZ0BnPmMyfaSq4N+ZjOyAPF6ErZ026RrB
wWn0Kr5Dkwu1BfkGZ6bkg7NZxkO4yon8rg1adKsVwn0xeRmf8i04JKDqyh1N
ApbITrEBfgw6yzrn86IBDw8ub3RGdwuj7uM2L9+W5kCDlZleP68wyne772ws
mgMpZlNagtc5UGj8GfFA4yIwEErYUQ+ehz11T8Mb8yRQzXJR8jRchhznt0YH
zpKhxye91MWQHbVdyPw1mFQMpyZLtavwHSCy/RSGywkQ08j+tr+FCU3mpLWT
PSuAZV7WpmmFAYngha4KbVUC6yXWlmSaNeAX+1rmf4oMQk0x3E3U/2C+6wJO
zYwE4mG6RrMKYgiXYFHu5YADt0YZXZ+qRkhPiWIpulULBBnxw9V4KmR5kd4N
Buvh/YtnzZ7FtGjceMLbfbwWbMnlNDsKXOjm/H0RTF0+SB2vGvr08CdclGr5
V1RHBLnTXucPRougjgH6Ot+rOMA3CfdpsKwC/wa2gk2TTLmnu6q3NQ9tv0td
T6yR4PLzjaDO1HW49ECKU16ADKyyVwTljVjRJY8gZ5/WUtDzl55oShFCGfq5
m4rtWKDNUjc9FbAF/UsDu3xvSSAWEs9AYzIItn5Nfe0r9bDEpf98b2YWDI2L
uW98IUF813vsqgAT8vTP+NBBVQmNc/e8cv9iUJSgYfpmPw5w3ebBI1yCKNhu
KP+oLRY4eEpUMNH86Kqf8iLrHyw4ztY5uWwcQreNCuAzrgQ4GgapT8ztw7er
O2sS2kQILnc4UdNGg+5JX0n4TSKAeVwfkVDGiTqv3Tj/s7gATi2kZsll/ITx
PNwj+kYiaEQlNLja0KOxi5YWm/bVkDZxkma9kAZh1/e7jo0SAO43i2183IRX
DwO0h0ZIEJa7ojE2vgk5LFti2X0kUOo5Qdsdugsj9R5a4h1E2NN/5Gr6Zwr6
nM6+uWxPgrvaulxv47aho7smM/sGCZjqpefShnchod88+VQNESQjZJ8FhOxD
Ne/09PdrRLisw7dBxL8G6rEYtRz6aqjIDx0ZLB6FvD2zp9MORPjiU1hT5T4L
mFo39bh6EkRGTjGYdjQD0c5h8NCvWmB7s2Zu/XcAmNHrRr6CeoiZVfI7cPAH
9MeGPBYJJQLf38WBsqQRIMheqqg6TwQnmQlkOjgLXBY/XJVaSBD0PuA/1okm
OCp7ve9Zay3YeaX5WuoPwMYtX5Go5/UQcSdin0NkDC4tst82uEOEnIk0+YGf
K1Bq73ipn6InRfdJtdmHw7C3GD2erEiExvMHsGMwCNdklftzF+th3f7VOpNQ
F9BGerTepa4DHxcPfZ5zi1A97FFuLUEGq8Kw8NXpFVCaHLEiUfplsRkU3Y1f
g//ybBtMFMjgFxA87W3/BVQsGC9S8RPAlFfrWo9FP3ySieu7bF0PAtxMX8OP
tULQEX8i8TgB8iIcRxtdSbAgURNZt18DL748ZHB63Ay63Yycs6O10JDxWE6P
bQaoEvUrjEJJMOpq2TvpzIS0O2PzksgV8Nln3GnkCCM67cCfm99aCZ6xT6V/
1x9AzXS/4i8sVsMjJ+nITpu/cKXT8MLJTyQwkrm8IPf7GzAfF7XdGaiDiA/0
x5Klp0AjSNhKWY8EX5gPHrj0iwnRTvm0WV+tgDknjxD6REb0+jPpv393KkEf
K1R6Q4Ie3d/tg7HYatAZM2BdYd4EruD+p0UrJDDO9130OzwH2ZbuEaodJAiN
/9Mr9ocRsfCXDtJKVQKv0bGVgFYG9F06o21FsArUu7tEffwPoP8eRe83HKsB
c52jQuc+boOn3+1eXkcS3EnaEImSZkOnNXCSk09L4LbC9v6jMVZkEsOwPeVc
CtrzTbplriyotbv8h+nRcvi0ettTVmsPmoeU+pOzKX77cdTHSLwLkgk3LLlp
68D41cZobsc4NNhqXmtfIULR7ETYARMGdFY/aSkgvAq05H63XWvvhQNSMxI9
jPVQXuNpXGB/APUtRN8gn68BAv/pjnc5NOjs3xHTKzME4E6xyO/Y4ka39nwU
hO/mwRiViczb78qoWNwpWMcwFCxDAhJ3JflQgb7gdo4uDs75qp2zFD2FsndG
jcTTQ6Dff1Ffw48KLbu2lNyho/jTjsWw5NEJxE/XL/Ws8iEcYaDy/6D8Aw4t
72oRIohAlHim20zqgoQrBnMsR+rgPe69R/27YeD7Qde8pESE3BOJw9W3MIj5
D9Nuyjs8TEqaaQadxqClM7+DVgl4iDnDNy1zEYOs1wOVvcoodfAfV78znGjf
scWOz74QjroMUave6QTC3Zf7zt8JwBlh8CS4tRC+fhVzWe+vhtNfu/3lMjEo
aCHy19dbeLjx2OUY2RuD6HAvRjve4CG5zi/tQSgGyW71XGiLwkNaxb+HK5Hs
yDNTARtpVAw/HELqFyn6PtdYy7RN0feLYguTdAofZOx4X+6k8EFvRIZAfjAG
ZSodFHsZjYfwRHnT/ZcYNH/ElcUlCA+PbPn5FcM5UJHGwuEeiSLYcvR4soDF
oFzTK0RDBzyk7B+bSfPHIAaso7tTLB5Uz6figyIwKEEpJAEbjoe6mfmyy63s
SP6InOPSXhFQJ9bsFba1g0tkZrZLKgHSEj/Rz96rgFxlzyw3vRpwyaUb8Thx
GCXuESIzI/GgaPr08Up5N+jZbXiV29aBf23GzvTVw+hQqN+AWhIedv7Evj0y
KIqYv+SXzlzFg007KeY6ByO6YvKMbXyUov87NhPLNAyI2j0+59mXKsBmJ8/r
C61ABjODxiiFf569itHx1t2C4wVOQf8ySCDZZm2iYE2FohnululyEWFFzuSe
kgob8mlmGToXVAKp4svtGmHfoGfhgt4Dch1YGAlVXgxhQcPSlz0ihMvBljrd
5PojKlT6YziQmYoIk8FW+Pi6Dch4oChT+o8EZmdD+s3SFkC+Z8bHeJ8E/T9N
5fI1WVBDapGmhlE5+PCp9o20UyGPaNpVp/J6YIRtLU2BvxDgmb1IRfE3Eav3
/rHMMhgHCJT1qJFB4fTNjgf2mxA2J3dW5hcJhCTZbYVoqNEyobe5LKwedJi+
/UUnONDcdnF89OMiMFWh9vWPmQJin0bYkjkJfvfbyBVyMaCqkJxXxTVVsH7q
z4PxKmr0x+HAME9XHby1mu67vroMwVbDhCeU/zI9WdCYdOcUOsHZyPuvOAQU
XHnEwwfPoKb2M2z4IwGgvfwx67DeBMg1v87XpCOBZXjpMe+8cZgUYuVx/E2E
vLHK51w8YkhV4QvfjWQcvHShzpI3U0NY++P4DcF78Po/NcmbhidRDGvuMzbR
h6Ab2xF4lXwauQUW5pGcg4CVqddqdX8bGritvGMpvGTJce9H+sElCPbcutt4
lAz2MX8eZheIIBnFkpzuBzj4TP/igYOKKjJ5p4ut++oNd3bsPvie5kGufm9f
CjLlgQNJnOb65inknR/6fW0yGAT+k7oSLUN5n0qLzG5OCAz18Kz0t8qix1P1
Sx9fvYR3gVcOp8kIogxGYcxnGyzcMEsSnLVQQWnZUf2PdnyBqfLj17XAM+gO
ihix1AqEg5vGJL9VRVT4NMVRxtgbZh2VBK650SGJmlc0ooq10Fn92a3SeB5Q
MM6zb4YE9NrZv9ekxZFr/ZwXk/176KGxGhjqUEN3pptkL6q7A0a3zYgzHIMS
hen/YJ7ioYOjcyJpUxXdOt8yWxR0H05XO/2nPaGEug8XMvIaBMNhYt6Abh8b
Stc9umXJWwJu/bnytiqb8OjLSIbgbxJo0PI4LuVQoZ3pQu+/Q/Uw1GjxxuMY
DfLUHs59RvEbnr6DC2vCiPynKnJo8ZWg8enJ/toZBpQ0kCKBS66C84eH7Y5y
iKK38QdjVFtwEDycuBL0fhb8+1IZ/BtJUNirMGvCvgTSKd/UGOTJYOAfGiJS
tQVU2s98Ml6QoGNMtFr3+yYc0MDYbvaTYND89RMNPX605ENgn5TIgYPWKrnC
Cl+g4bq27h4HAZp+stuElC+BSTA19S6Fn2/I7P64MDYPa16J9+0o8/C222Uj
c0ZeNCdHH1NLwoPG58HPdSW/Yc89TGSZjQwm9OY/rcpnAApCB3GxFA4YHwhv
uMWDRHExCV4VuXC/t6d2gq0FrKZfKPYs1lLyUO7xwxUO1K9q3WKTWwj2Asfu
q73mRAxp5gq8+wWgs5dcwqrPhApOMSw2D1UAYfbm42xfakQ1Ln+LlaMepAui
9OvsdmCS7Qrd+kESRLMr2IRl74LXa9mPL5qIsDjXFI0bO4gc+86RhAXL4P6w
o2YKPy1KH6gLDPUlQDTmNf/NPk60NCSt7u1eADY2a35xlaswvEj3jqBC2f+m
rvXzhe6BlYt3uGcCEe5OtabdeUyHIiSZ22gEakFJkDBzBXsELag4d//HEgta
WVGrVC0yaGh0jzrg2Ws4E+ZFilAXQV1qfFHh7DiQiBjlxpuyoz0IUjaMK4aK
I6qXmHv5kOUhNn36pzkQGrfpUuMviUrWynpjpVNgxkYp3fw2P3oRTqfzjjEH
QkoIL79H8aOejIDfSxQ+n5WzL7kVxI+CGe/9GqXsi6+ddZ2KWxXROQm2kSiC
N3Bks1DnTNKiA0/UNIlFtWCdKq7kli2EDqUYi+V3Y+FaCDOJu5cV3cs9ekrU
rRTe22891ew4hGIFBO6Pk0ugeTclSc2XFdGX2EkPfyyF2xKT1/SsjqCBiTNF
9x7HwuFA/U7TLg6ktzAsLtFRCNfwpsHER7yIGvuIwYQbD2MXRJdP8PGhYb6M
NwKWOBj5E6jooMqLlPenjGP98cBYbZOrPyGOhFJ7FD8Q30FXd0wZS7c4Gv6C
kf278w5abTlfWhyWQMPx3dpMq5lgvcj2gP29OGqQSyAap2TBYPGCeUsqD4r+
t7IW4JQLGBb2+SarBtDTapvZPFsLH8Kf1pqYVcI8tlWg+nINbH+tbcMYyKGu
v7O29jovQCce1el1tcNNv6/svZR5aXfigw/hlRx6n9V7ouLLc5jUOnY5iV8O
2b39Fcx1Mhqq17XxU+bU6F6TrPD+yXoYKIi5R2V2BmVazXtBfCA4iHB9SL0k
jwTVbJICDz2CER7yjePBsujNQLF+veMriPzZuhfGehxppMqXHq/xAlMRHj3Z
Dmkk4cJ00iswjrLXEbIVKPkYyHS+tYiSj+/uyFgE0cugy3dTwxUjY0DY0apD
6ZQUqnDzmyrlTwR38kJcf/tRZF0nUM6dFwYyOda9IZXi6Je7gdwRqyzws08W
dy4URwk3VLpX72UB0YacZ/NPCnF0lRkxPk0AToXmh2NxIuh9U+Cmtz0O/Lki
pne1ZJEStRd/Yvsr0GwOyHx8mw2NJY7DlE0JGHvolAQe34cPlz7VOdwlApvC
EypfVRYUHacsccqsHJYfPlMJPceF3DnchA3e5APfLT+9QDse1HN0PGy7KRdM
xvFVDjI8aON24VszTB6kOK7HjVqKIWuu19kuf3Pgealqf76CJMpnvkuoTk8F
WXZcne9JWYTrbk3cnH4Fes6xhicDlREzefJQUWYotA6+We8UUkbDt0PMf9WE
QFwxo6OfuzJSj/r1fDkhFHhc4j46nFZGayXuNqPCocD3zYT17CsGxOmSnWJu
VAX6V7vrq215kEj7wFvlllw4cO7bv2hpKcRa/nNi2zgRnmQGb6msSCAl679i
k4NpsH2t0Ug3SRJp9mW++B6fDE0rvtrccxJIo00pqI4hHZarL7x0fyCCvK+m
3Pygg4OiffPR6R4McjXKp6oVxkPDO9GqzUMYZJNlX1LZgIebhJ6fRWUYxCTx
IKXSEA/q2hoGAqYYJBn0I/ViMR7GG6x7L25LI69G0+ph6TiYifkeN8chhaoG
6b8npyeCTq2CUUyKFMoO2201+vgGLvx4XrntLYkYP4k7DZ9NgRdJnvyLIsug
jMXTelF45ibbB2aGvT/w/KbQFQ8MGTpt0z8PvNkCus88kucpeS1h5Qpf+Xqh
Yohbk3+8DrR+ZF1XdxuH988dUzcmiJB9u8C2dnYSfmKLv+lokuB/4vYQgQ==

      "]]}, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> 
    True, AxesLabel -> {
      FormBox["\"d\"", TraditionalForm], 
      FormBox["\"p(d)\"", TraditionalForm]}, PlotRange -> Automatic, 
    PlotRangeClipping -> True],"\"h1=1*\\!\\(\\*SqrtBox[\\(Ns\\)]\\)\""},
  "Labeled",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"]}, {
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, 
    GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
    BaselinePosition -> {1, 1}]& ),
  InterpretationFunction->(RowBox[{"Labeled", "[", 
     RowBox[{#, ",", #2}], "]"}]& )]], "Output",
 CellChangeTimes->{{3.504415599421875*^9, 3.5044156051875*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{3.50441559028125*^9}],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{
     Hue[0.67, 0.6, 0.6], 
     PointSize[0.006], 
     PointBox[CompressedData["
1:eJwVl3c8Fe4Xx+2RZK+Ei4xkJFtxHjsls2yJNKyGZF6rQkpIpCR8ccmed5ZR
hFBWRiIZkZmRWfjd31/PH8/r9fxxnvP+nPcRd79hfZmOhoZGhZaG5v/nyr/e
zfzVNTBrcV25/IsMUpr08jyFAkhbpiYbWkrANEyzrbQMgwSVGPUO++NAuevR
P9v+L3A+Y0VcSIcADNEnZpUVV+CR/LQuvS8ZBBme3TrktgZrAoRr0l/JUGhy
1oVHnwtFfvdnldevBgU9sRC8Pzeqv32qo1muCmjp+JM/jAmjxx3EL4/2FQIo
8rMFmy6DY9gU46QJGXTOD2zp8HZBcsUd+vgBPBxj43tgad8FPVm/na1H8PDi
GF8JqzkLmhF6k07+S4TOeOZrlvXMKP7UWF2IKgn+amTnhRbzI+2o4xSa5VJQ
R0mpnbo8qDbSLJMDWwmXrbPDwYEbYd0djaQNqsBfXF42kLAFUqUnmT4oUIAt
rkt8UBCDWPpNnmlp50PAufWuhJ5DqGUtzKPF4zU02lkbD/AfQiIKu8X8P19D
hvVP/YMXuVC7TtCaonQ1mAo/+3ciYg5oJzXv1aeRQCvXS/mW2TI4dYxaepwi
Q29gVo2XGScy5VUxaJSrAbXJGgNyYSeUV+xNy/bgIbmJ8/nAR1ZU91bWn8+Z
CGxzR5xbVpjRkTdlp3UwJGA/y/7xJd0fMG5ML8gqJ4NwSzJvC+1fGBdWVb+u
RQGJ+0bmMwriyOS9CJ1IUx74NskaBZKbYCriG67QHg+1shJilEIaFLbnELpz
iAK4xw9bb1XRo6dTCnsecWRweU+g+6fAg+ZOhXUaP6wEqWPkbx/Cx+CVcZek
hg0R5NT9Tu1PEEHBnh/jXswUQGHLoX4dtlXYwbPwMyeQqfcMDsZbc7B/YvTD
fhwJzj1aD+t6tQZx9jcPZo6Sgf2I/UF5c3b0TeTojcU6PBiHSE+0ZAijsxEK
srInC4E+94SVWugWBGt+UGQ5SgHxyFRmOssh8DRKrhAoJcASj8mj3ekZaLKl
uT7pSYLUblz+qhArEooeb79dQISm2dt+RZsYdH/P+2XjARy87rGJGOE5iITG
erLVbxQBF1+1JiZBELWKKvY/7SsG95m6S17rB9B77NoX/GoNcDUO0arM7oHy
tFrEESUKRBDcVN58okN04TmSX+vJYJPS31CL50ajXu9u5C5Xgtr8q1y57DEI
SNsZ/GtHBJ34Z40+zkzIpkNxzI9EgswJVbq1Cjrk6JpI4W0mA/i3iq+XbgCp
Y35z7AAF7het6IyOb0CHwtQOhZsCyr0q9D1RO8AYSvhQr0uBXZO7PlaLP6G/
lt0/Y4EI1w2MeJ6nbMNHm91MQ3UKsNZLz2YO70BH19eGGh0KHI498jA0cg8s
ajXjTqpQ4JyhwHpD4RM48+fhox+RNUAsixoZqvoOQexTqt/oiNAWWPGGfGMG
BGfqG+acSBAX95PZqrMVPLWlUp/F4IEj7Y+N4+Yg2NTs5YsnEyB5RjmYcf8P
UAztbXUVIYLA5u9BfPoIzH6bEe9YIMAl2QlkNTQDYScKVSyvkSAMF+rBPtEC
34tf7xhi8XDBLzPI1mQQBI7fbBO5T4BY79g9LpFR6DES+9WyjwgFE5nyg2Mr
8ElOTZXjARkUb0xqz4QPgxSW6eGJQQI0nWLMH4UhKKavjO0rJsCaa9Iaq3A3
XC/J6m5ewEOg100TPr3fkNS3f3dvmwR2FfdjVqdWwLV05MAn6nu5HKaV11P/
gNay2e74OzIEh0ZM3XFtA9V90tw7aXiw4td36j0/AOxVW2rfbhJAiJe1I0ap
Hehm6V/sZeOhONb9e5PPOxgbWO4SVsHD47Zw5kv3WiHhWkqi8T08NGbfkzPm
mIYeAfmmU9wk+O5j2zd5mRWlnRhhOB5LhObA8UsjMixowXuURpCNBLeePpBe
qGdEXKLYyp0FEty9JB3X5bwJa1bx1/4dpIC57Ll5uYUvMEAzsLCuS61XCZPS
S+mfEMgo4Z3TS/2/ffsZz/5iRWJc0WyfzYkwe+lmJNMLFqTXMXhZeoQIJvnC
NVckmVD/0C8/iw4SGI6asq/s24DKRoZiejoKWJQF/Q4Wm4WlyMV0o5skiEpd
7BNfZEH7SEJPv5GJwG+utBLazoxOPW0OJSqR4ERPt2hgCCOyW9FxfMdA5cHw
qLBe6TaMRTS779OggHf6uki8NAcaU/nrkThcA54K23t3R9nR3oUezZRgPBjM
tRjhfdiQhNvr4tBsAnxY9bx1RH8X9GwEHRlPUnn7cTTQXKIbqsP/S7q0iAeL
pPXvRZ3joE9/tbrqLhEqZybuM1oyIwZOVUlbVxLoyy18cvrcB4olSeZnrQhA
eHPLotyVESmb6iQ4s5OhVlC9M6eADtVNSXZxtZKBN+N8WecWL/paLm3MJ1oB
ozSWss+/HkdbHtnTdrVhYBsZ+mLnsACq8e+9pXOhFPSCtPVsRdWQy1xjTHhb
OAyE/DbRCaZBwTaNUVESVD4vsJlV31VBDteyLQ8nhYMMM01IyfEfwMrH68Ap
SYQGyYdGre+6YZBXOrTtLx5wr3E363OG4bDf1OzGEAGKVF4MU65hkCzjtkVl
Nw4mD1vrhqljELbmH0MFTz4kawhMyZ7BIH12GlPcJg6SIxZ9gjW4Ucw9rKGV
WxUc9fpGq+XdBed8ZYLmv+OBO9Y0OqK9AvAzekft2mpAvaMnRO4/DKpj9t26
GIODK/e8lN7fwSCcxLCVTwMOXtYFZwZEYdBvBpmErxU4yCT+DV+J40T7i7z+
0i1Vww+3yPrf1P6+LkVbY0bt78dV5y2zqH6Quv9znwbVD/pis4XKIjBIZ+TE
hFY1DmJeyFvtJWJQgqhnx/VXOLjrIiioGMOFppZ/S4/QVcOW+83o+XwMijvZ
K5cZjoOMPaXpzBAMUlzn3Vgj40Dr1KvCsFgMIlluDH9+jYO66Tn8uXZONGaP
Lf5ZWQ20L97sVnz6DHql0putrXjIfPGBaeY2EcrtxGotlmvAq4hh5KaKGEKJ
Kk+ZR/JB0erBvRVCD4wtvIs05CRAyNvsf1MOYmjX09g+tSkf/i0+fS4zJIoG
Hk8YFfMVgPPnd8kXuVjQ74f/Avl4ScDv7TyxTMeMsny7yxGWBPl5L+dMhFeA
73R74gEvMjxMSja8Y7QFfyjj7hdlqfn7ydFSwZEGrd35m9guRYEVOcvbypoc
KPOVTDT3lxp4JbH8Wef+F8ARDUdd1Qlw3lyYdCaSDWWGVCeGpBHAhTbL8uJd
GjSp5BAZKU6ByQi7wtS6dVD58jHizl8yWJ+MHLDOnIeJzPZWAoEEA2NWcmW6
bEhJ9Qp7Mp4AgQJa/SOfadBgLBfGX5ACLLCtryu0CZ/6I8/c56dAQ74x7p7s
MizhXzqc0SeDgvrVzgDXDeg/LZ75g4UCwoc5XYTpaKn8B1i+46KAIeuXTaTC
hUro3//HbFkNVpq0QSHJP8FlszmHMkaEhQFnuQoeZrQdIVzJFECCNbXFgHEy
LeKomp7KWiPDc7up/oury1BDnpppuEQGK9XypnRvNfQ8RZMVS+VFwYdPImZI
Aw2Gv9Ol7Q8Gg+XSXDHjCXjkE9DJ8ZQItjE1SneKx0H0qfXZwjAiFI+SHvHw
iaMIkYwLItN5kOhFmytvrY3MCnXVaQ7dhCce2oevmqkizzTxoN5/4WD0tBPr
8F4dvZlvGa14hgV21j671b1tiJ4o4HSn+pIt1+0fWfuXoGhTRjSWgwyuyYvh
eeUiSOna+9Wp3gJoZnoc4Kaphdpe2ZqrstwB738XSoLU+VAi24Wr7JPl4PZO
gu7ihhqScRYSXlwJAyEPKfsEWTWU1CBDZGgKh2+9fCsD7UfQW65bL3WCEiEH
ay+WKXsQZeto72t1KYIr1ukHZ85rogh5F99nlkHASirt+IPVQLzDWAv7kRDY
v2HxLnhVEalid3QfG0fAjLuykJMvA7J8E32ZaEuGLkqzL8liDgL6nuXcSyYB
k0Hewh9pCaTo7Gc4Y50LvXR2g986tVGOR0rPRW9vwBh9MueOwaB/Ah671UU4
6OTqmkjf0EJ18V2i51tugTrlkofBhDLifoRbunQQC2INxYNG/Rzosmh0BOeD
GvAdKJJ30dyAtSuciw2MFNCh53NfKqBBU2VaBSoiFPjWdD7tphIdysgzwjv9
oO4DTJ08+ZYsiIXlo27xNtWPPkTv/dFgRmvNPmvXqX5wSmz4wlEuUfRCq9LU
ObUAIoZfrIThZqDVX/77MXcSVPQpzFhyLsFpE/psDU4ymIZERYqQt0AD3yw/
QfX1zlFRitHXDTh2+q4tG9WfhmyeROsYCyJvL83V96IlsN9Rs+iQQhvU+cUs
fErFQ8sYp3MkYQmYbjtO+yuS4Yrszo/To3NQ+uuN/MkcEnj6njO3YeFHjb1f
4jXfl4FO81BzXfUCPK2sik3oJYElk82YHWEazLVky3ekSTA/PhjTeI0PBUrX
Pg7MKAf/vt63ExwfoY1/h+dqHJ6ah3L3wle40DyXRU9iVhW4Cin5az/hRmZb
qaOvuKrAcPdlNbsJK/rg3XLGIYUItTNX7+UF0SJ37waMLQ0FpMvjTeou/IOS
hq/zB4ECCZwKzvfzdsDFTI75KtUPf8+2JLwe3Y9wHAwyzqt48B92180QpEc9
qrtPNsvIkIB5Ini1nxudYE1f1e+rBGfnP8EppFXALcivLeGo+99PpwGBqF3w
0PPhqdGmwPWf7Zne9xiQ5JuXRe6WZFA+WDttny+DppicZqoOpIJ+bvwqzUdZ
NFbprWcgmAwa9/3exZ4QQdJ/VNZsxF6DZOx33kIrTuRYEC5YL0X1TRmts/v6
BBBXjZvb7LMSiErZ8HoTchj1xHp0f9vKhGln5SwbT0F0Y0f6bd12MURW1yZ+
jRdEQWcjxL/1F8OMnGv1tTBBhBneynafKoYnl40uVbUrotB2v976DxHAlcdG
WzBJj5a/+l6ywJLB8ZWEsm+eMIriY5xPVy8Ep8h973j72NGBY/bPnoRT56/r
1gPdzgPoQf/zkUdMeGjdyUjXDmJHwQyuadNFePCUnHQytpNBd3a7E9TmU0EM
a9Jl1c2F3AyCtFprq8Cp0Cqi4S4/yjxzG81JlsHoadFlFQEB9NggquTu9VIY
WcQqumnxI/qCZcWBqDJgoTgXmUxIoEPXrwwayeRAd08ynq1HAp3fqTtjYZAD
7S7ciefFJJG1op/2h6b/wPE3RwAnTgINyMpPrDzKgaGqeZuPr/jQulJp6y3r
csCwcc612DWCTMuxqX+n8FAS8+CtpTUJptIMT1xYr4HtjrefMKZySDLh6KKf
y2MwTEV1xt2foWhuXXyJOi8vqJQE1ibJIRWtmrIG9XiY1Fc6ly4oh2TT62uy
5BKAsmZQ+NOGFl1NM1NnZKLAYHnybRprDfT8Cm/qolkouInwlLw6K48cV9KZ
QxajYYTv/ZVjEUdQTpu8vcm1JIgba9+9z34M3VlR+EyIwYKVCJ/xkU5ppHyD
SzcnKA0GlmrzFKj5mOUcWGhAzcccb9nzYUyyyJyXB+T2pcAhd7tOZTUpZFOK
axOOy4Ab7+dTBj4fRdmHZFKuJMWCbIFjXyRJAg0vBswW+ORAsOtLicsVEsjO
0F2GEpwDDc7vi53/SqFhFYu1c4zpwK3QGj6aIoLW7jocUfpZACE8sVM7+keQ
n8Shc76rSaDbGvrfPU8OVPBLFOvwtgYsbhpWY4/tQUI41/klNQpwKETTBGmx
oT2SY+4qkQDL4Q81o/R4kHvHTGhbcCUIXAs2xl7gQ8m5X5h2isrBcryQ7CbL
h8TOoir7zXLIcF9L+W4rjoJuHdcvjcuDRzVaA2UKh5FkU/FP390sOML5ui5I
9Qh6LTOofZ/vCRhffmqmij2OEEMbh8/hMGgfSlvrEj6ONDpavouEYiGlisU9
+MZxlK/VYel0IAz4vFJK3dSPo7VPi07jhVgQ+GLJfjKJGZk79WY3GpPAxKGn
nuLCh2Rz9mg5SsqBUe/L3wRpKWR21Jwpl5wB0f9FbGmuSCKR6X2CHy5lw7ZT
k7lR+mF0dvJxnXdiJrSsBBnwzkqiRtOAvzG3smGZcjrxRoAIiuds1/u1WQCV
ezbfp3ox6OnPrJ1APRw05oiSNw5gkF4R5QytST5cre0dq8Rj0JiF4FCuFw5O
GOiYCllhUBGuWvLrEg7GGx37zmxLIyWHLcL65jOYTv6aMsslhW4U62EMdjPA
8K2CeXKGFJp69gc/ofYSTv94RNq+cxgtC9rvzrBmweP0W4K/RZYhHm/IhUVk
uMpRso95dxGqtcUzI/6QoMslq3kwbQtcE84gN3kKSNr5QIdAH4R3KyM/fQLo
/8i9eMJ3HEhEly8b/kTI8yx3eTszCRcTNJ+8aifC/wCA7wZb
      "]]}, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> 
    True, AxesLabel -> {
      FormBox["\"d\"", TraditionalForm], 
      FormBox["\"p(d)\"", TraditionalForm]}, PlotRange -> Automatic, 
    PlotRangeClipping -> True],"\"h1=2*\\!\\(\\*SqrtBox[\\(Ns\\)]\\)\""},
  "Labeled",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"]}, {
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, 
    GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
    BaselinePosition -> {1, 1}]& ),
  InterpretationFunction->(RowBox[{"Labeled", "[", 
     RowBox[{#, ",", #2}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.504414848796875*^9, 3.504414907828125*^9, {3.504414970296875*^9, 
   3.504415008265625*^9}, {3.50441504325*^9, 3.5044150473125*^9}, {
   3.504415089828125*^9, 3.504415145296875*^9}, 3.504415211234375*^9, {
   3.504415495734375*^9, 3.50441550303125*^9}}]
}, Closed]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.50441484696875*^9, 3.504414846984375*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", "*)"}], "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.50441398475*^9, 3.5044139900625*^9}, {
  3.50441612134375*^9, 3.50441613571875*^9}, {3.5044162270625*^9, 
  3.504416296875*^9}, {3.504416337046875*^9, 3.5044164083125*^9}, {
  3.504416583296875*^9, 3.5044165899375*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Export", "::", "\<\"infer\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Cannot infer format of file \
\\\\\\\"\\\", \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\!\\(\\\"pp\\\"\\), \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\".\\\\\\\"\\\", \\\"MT\\\
\"]\\) \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/Export/infer\\\", ButtonNote -> \
\\\"Export::infer\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{{3.504416341421875*^9, 3.50441637371875*^9}, 
   3.504416405328125*^9}],

Cell[BoxData["$Failed"], "Output",
 CellChangeTimes->{{3.504413990828125*^9, 3.504414009421875*^9}, {
   3.5044161124375*^9, 3.50441612228125*^9}, {3.504416341421875*^9, 
   3.50441637371875*^9}, 3.504416405328125*^9}]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1115, 777},
WindowMargins->{{57, Automatic}, {23, Automatic}},
FrontEndVersion->"8.0 for Microsoft Windows (32-bit) (November 7, 2010)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[545, 20, 261, 8, 42, "Input"],
Cell[CellGroupData[{
Cell[831, 32, 84, 2, 39, "Input"],
Cell[918, 36, 793, 13, 25, "Message"],
Cell[1714, 51, 792, 13, 28, "Message"],
Cell[2509, 66, 792, 13, 25, "Message"],
Cell[3304, 81, 846, 13, 22, "Message"]
}, Open  ]],
Cell[4165, 97, 374, 9, 94, "Input"],
Cell[4542, 108, 1235, 32, 202, "Input"],
Cell[5780, 142, 802, 14, 67, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}],
Cell[6585, 158, 123, 3, 38, "Output"],
Cell[CellGroupData[{
Cell[6733, 165, 104, 1, 85, "Section"],
Cell[CellGroupData[{
Cell[6862, 170, 1274, 40, 229, "Input"],
Cell[8139, 212, 330, 7, 72, "Output"],
Cell[8472, 221, 327, 7, 64, "Output"],
Cell[8802, 230, 281, 6, 38, "Output"],
Cell[9086, 238, 114, 1, 40, "Output"],
Cell[9203, 241, 325, 6, 64, "Output"],
Cell[9531, 249, 345, 7, 64, "Output"],
Cell[9879, 258, 285, 6, 38, "Output"],
Cell[10167, 266, 127, 2, 38, "Output"]
}, Closed]],
Cell[10309, 271, 1717, 43, 140, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}],
Cell[CellGroupData[{
Cell[12051, 318, 1822, 56, 283, "Input"],
Cell[13876, 376, 132, 2, 38, "Output"],
Cell[14011, 380, 132, 2, 38, "Output"],
Cell[14146, 384, 133, 2, 38, "Output"],
Cell[14282, 388, 131, 2, 38, "Output"],
Cell[14416, 392, 132, 2, 38, "Output"],
Cell[14551, 396, 133, 2, 38, "Output"],
Cell[14687, 400, 134, 2, 38, "Output"],
Cell[14824, 404, 133, 2, 38, "Output"],
Cell[14960, 408, 258, 6, 38, "Output"]
}, Closed]],
Cell[15233, 417, 144, 3, 32, "Text"],
Cell[CellGroupData[{
Cell[15402, 424, 594, 14, 39, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}],
Cell[15999, 440, 36609, 647, 527, "Output",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}]
}, Closed]],
Cell[52623, 1090, 243, 5, 31, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[52903, 1100, 167, 5, 117, "Section"],
Cell[53073, 1107, 2582, 55, 157, "Input"],
Cell[55658, 1164, 5718, 132, 391, "Input"],
Cell[CellGroupData[{
Cell[61401, 1300, 1972, 33, 229, "Input"],
Cell[63376, 1335, 659, 10, 38, "Output"],
Cell[64038, 1347, 659, 10, 38, "Output"],
Cell[64700, 1359, 659, 10, 38, "Output"],
Cell[65362, 1371, 660, 10, 38, "Output"],
Cell[66025, 1383, 644, 10, 38, "Output"],
Cell[66672, 1395, 645, 10, 38, "Output"],
Cell[67320, 1407, 660, 10, 38, "Output"],
Cell[67983, 1419, 660, 10, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[68680, 1434, 1313, 33, 67, "Input"],
Cell[69996, 1469, 19951, 334, 299, "Output"],
Cell[89950, 1805, 10208, 173, 302, "Output"]
}, Closed]],
Cell[100173, 1981, 625, 17, 86, "Input"],
Cell[CellGroupData[{
Cell[100823, 2002, 2686, 58, 148, "Input"],
Cell[103512, 2062, 28918, 799, 557, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[132467, 2866, 629, 17, 59, "Input"],
Cell[133099, 2885, 81252, 2098, 583, "Output"]
}, Closed]],
Cell[214366, 4986, 92, 1, 31, "Input"],
Cell[CellGroupData[{
Cell[214483, 4991, 1196, 20, 39, "Input"],
Cell[215682, 5013, 49272, 1303, 436, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[264991, 6321, 1219, 32, 86, "Input"],
Cell[266213, 6355, 144465, 3826, 552, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[410715, 10186, 683, 15, 31, "Input"],
Cell[411401, 10203, 67440, 1765, 553, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[478878, 11973, 4896, 124, 518, "Input"],
Cell[483777, 12099, 823, 13, 56, "Output"],
Cell[484603, 12114, 825, 13, 56, "Output"],
Cell[485431, 12129, 801, 12, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[486269, 12146, 157, 3, 39, "Input"],
Cell[486429, 12151, 1800, 35, 536, "Output"]
}, Closed]],
Cell[488244, 12189, 88, 1, 31, "Input"],
Cell[488335, 12192, 945, 22, 67, "Input"],
Cell[489283, 12216, 458, 12, 67, "Input"],
Cell[489744, 12230, 4916, 120, 499, "Input"],
Cell[494663, 12352, 1763, 43, 121, "Input"],
Cell[CellGroupData[{
Cell[496451, 12399, 151, 3, 39, "Input"],
Cell[496605, 12404, 32733, 544, 288, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[529375, 12953, 2760, 69, 194, "Input"],
Cell[532138, 13024, 330, 5, 29, "Print"],
Cell[532471, 13031, 743, 11, 38, "Output"],
Cell[533217, 13044, 746, 11, 38, "Output"],
Cell[533966, 13057, 745, 11, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[534748, 13073, 187, 4, 39, "Input"],
Cell[534938, 13079, 260, 3, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[535235, 13087, 131, 2, 39, "Input"],
Cell[535369, 13091, 4700, 81, 291, "Output"]
}, Closed]],
Cell[540084, 13175, 4314, 115, 664, "Input"],
Cell[CellGroupData[{
Cell[544423, 13294, 113, 2, 39, "Input"],
Cell[544539, 13298, 111, 1, 38, "Output"]
}, Open  ]],
Cell[544665, 13302, 639, 13, 53, "Input"],
Cell[545307, 13317, 634, 13, 53, "Input"],
Cell[545944, 13332, 268, 8, 39, "Input"],
Cell[546215, 13342, 2400, 54, 223, "Input"],
Cell[548618, 13398, 691, 18, 67, "Input"],
Cell[549312, 13418, 33763, 569, 284, "Input"],
Cell[583078, 13989, 33120, 559, 453, "Input"],
Cell[616201, 14550, 33340, 563, 344, "Input"],
Cell[CellGroupData[{
Cell[649566, 15117, 1322, 30, 202, "Input"],
Cell[650891, 15149, 86, 1, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[651014, 15155, 1221, 26, 91, "Input"],
Cell[652238, 15183, 230, 4, 38, "Output"]
}, Open  ]],
Cell[652483, 15190, 1452, 42, 148, "Input"],
Cell[CellGroupData[{
Cell[653960, 15236, 263, 8, 39, "Input"],
Cell[654226, 15246, 366, 6, 38, "Output"]
}, Open  ]],
Cell[654607, 15255, 6623, 162, 839, "Input"],
Cell[661233, 15419, 2289, 51, 159, "Input"],
Cell[CellGroupData[{
Cell[663547, 15474, 169, 3, 39, "Input"],
Cell[663719, 15479, 183, 5, 56, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[663939, 15489, 1897, 39, 39, "Input"],
Cell[665839, 15530, 1844, 35, 634, "Output"]
}, Open  ]],
Cell[667698, 15568, 212, 4, 94, "Input"],
Cell[667913, 15574, 92, 1, 39, "Input"],
Cell[CellGroupData[{
Cell[668030, 15579, 685, 19, 67, "Input"],
Cell[668718, 15600, 87, 1, 38, "Output"],
Cell[668808, 15603, 87, 1, 38, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[668932, 15609, 87, 1, 67, "Input"],
Cell[669022, 15612, 42398, 703, 326, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[711457, 16320, 87, 1, 59, "Input"],
Cell[711547, 16323, 7581, 131, 330, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[719165, 16459, 86, 1, 59, "Input"],
Cell[719254, 16462, 7596, 132, 330, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[726887, 16599, 86, 1, 59, "Input"],
Cell[726976, 16602, 7797, 135, 330, "Output"]
}, Closed]],
Cell[734788, 16740, 91, 1, 31, "Input"],
Cell[CellGroupData[{
Cell[734904, 16745, 324, 6, 67, "Input"],
Cell[735231, 16753, 619, 11, 22, "Message"],
Cell[735853, 16766, 218, 3, 38, "Output"]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
